paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-16 08:59:26 +02:00
Code Issues Packages Projects Releases Wiki Activity

* missing maybequoted() added for deletion of generated .s files during external assembly

Browse Source
This commit is contained in:
Tomas Hajny 2004-12-27 19:48:58 +00:00
parent 0343c6c578
commit 8b7e6be55c
1 changed files with 12 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
compiler/script.pas
View File

@ -251,13 +251,13 @@ end;
Procedure TAsmScriptDos.AddDeleteCommand (Const FileName : String);
begin
Add('Del '+ScriptFixFileName(FileName));
Add('Del ' + MaybeQuoted (ScriptFixFileName (FileName)));
end;
Procedure TAsmScriptDos.AddDeleteDirCommand (Const FileName : String);
begin
Add('Rmdir '+FileName);
Add('Rmdir ' + MaybeQuoted (ScriptFixFileName (FileName)));
end;
@ -317,13 +317,13 @@ end;
Procedure TAsmScriptAmiga.AddDeleteCommand (Const FileName : String);
begin
Add('Delete '+ScriptFixFileName(FileName));
Add('Delete ' + MaybeQuoted (ScriptFixFileName(FileName)));
end;
Procedure TAsmScriptAmiga.AddDeleteDirCommand (Const FileName : String);
begin
Add('Delete '+ScriptFixFileName(FileName));
Add('Delete ' + MaybeQuoted (ScriptFixFileName(FileName)));
end;
@ -372,13 +372,13 @@ end;
Procedure TAsmScriptUnix.AddDeleteCommand (Const FileName : String);
begin
Add('rm '+ScriptFixFileName(FileName));
Add('rm ' + MaybeQuoted (ScriptFixFileName(FileName)));
end;
Procedure TAsmScriptUnix.AddDeleteDirCommand (Const FileName : String);
begin
Add('rmdir '+ScriptFixFileName(FileName));
Add('rmdir ' + MaybeQuoted (ScriptFixFileName(FileName)));
end;
@ -434,13 +434,13 @@ end;
Procedure TAsmScriptMPW.AddDeleteCommand (Const FileName : String);
begin
Add('Delete '+ScriptFixFileName(FileName));
Add('Delete ' + MaybeQuoted (ScriptFixFileName(FileName)));
end;
Procedure TAsmScriptMPW.AddDeleteDirCommand (Const FileName : String);
begin
Add('Delete '+FileName);
Add('Delete ' + MaybeQuoted (ScriptFixFileName (FileName)));
end;
@ -503,7 +503,10 @@ end;
end.
{
$Log$
Revision 1.30 2004-08-20 10:23:35 olle
Revision 1.31 2004-12-27 19:48:58 hajny
* missing maybequoted() added for deletion of generated .s files during external assembly
Revision 1.30 2004/08/20 10:23:35 olle
* minor fix for macos
Revision 1.29 2004/06/20 08:55:30 florian