浏览代码

* 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
          else
           begin
-            AsmRes.AddDeleteCommand(FixFileName(smartpath+current_module.asmprefix^+'*'+target_info.objext));
+            while not SmartLinkOFiles.Empty do
+              AsmRes.AddDeleteCommand(SmartLinkOFiles.GetFirst);
             if scripted_ar then
               AsmRes.AddDeleteCommand(scriptfile);
             AsmRes.AddDeleteDirCommand(smartpath);