Преглед на файлове

* do not use a wildcard while deleting smartlinked objects after linking stage in a script, conflicts with script filename quoting on Unix at least

git-svn-id: trunk@37918 -
Károly Balogh преди 7 години
родител
ревизия
7e630686e0
променени са 1 файла, в които са добавени 2 реда и са изтрити 1 реда
  1. 2 1
      compiler/link.pas

+ 2 - 1
compiler/link.pas

@@ -891,7 +891,8 @@ Implementation
           end
           end
          else
          else
           begin
           begin
-            AsmRes.AddDeleteCommand(FixFileName(smartpath+current_module.asmprefix^+'*'+target_info.objext));
+            while not SmartLinkOFiles.Empty do
+              AsmRes.AddDeleteCommand(SmartLinkOFiles.GetFirst);
             if scripted_ar then
             if scripted_ar then
               AsmRes.AddDeleteCommand(scriptfile);
               AsmRes.AddDeleteCommand(scriptfile);
             AsmRes.AddDeleteDirCommand(smartpath);
             AsmRes.AddDeleteDirCommand(smartpath);