瀏覽代碼

* reverted previous changes, proper fix still to be found :-(

git-svn-id: trunk@11626 -
Tomas Hajny 17 年之前
父節點
當前提交
b7339852e1
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      compiler/systems/t_os2.pas

+ 1 - 1
compiler/systems/t_os2.pas

@@ -358,7 +358,7 @@ end;
           ImportLibrary : TImportLibrary;
           ImportSymbol  : TImportSymbol;
       begin
-        LibName:=FixFileName(ChangeFileExt(Current_Module.ObjFileName^,Target_Info.StaticCLibExt));
+        LibName:=FixFileName(Current_Module.RealModuleName^ + Target_Info.StaticLibExt);
         seq_no:=1;
         current_module.linkotherstaticlibs.add(libname,link_always);
         assign(out_file,current_module.outputpath^+libname);