Browse Source

* fix for web bug #4182

git-svn-id: trunk@2238 -
Tomas Hajny 19 years ago
parent
commit
6aced9e534
1 changed files with 2 additions and 4 deletions
  1. 2 4
      compiler/systems/t_go32v2.pas

+ 2 - 4
compiler/systems/t_go32v2.pas

@@ -231,10 +231,8 @@ begin
   SplitBinCmd(Info.ExeCmd[1],binstr,cmdstr);
   SplitBinCmd(Info.ExeCmd[1],binstr,cmdstr);
   Replace(cmdstr,'$EXE',maybequoted(current_module.exefilename^));
   Replace(cmdstr,'$EXE',maybequoted(current_module.exefilename^));
   Replace(cmdstr,'$OPT',Info.ExtraOptions);
   Replace(cmdstr,'$OPT',Info.ExtraOptions);
-  if source_info.system=system_i386_go32v2 then
-    Replace(cmdstr,'$RES','@'+maybequoted(outputexedir+Info.ResName))
-  else
-    Replace(cmdstr,'$RES',maybequoted(outputexedir+Info.ResName));
+  Replace(cmdstr,'$RES','@'+maybequoted(outputexedir+Info.ResName));
+(* Potential issues with older ld version??? *)
   Replace(cmdstr,'$STRIP',StripStr);
   Replace(cmdstr,'$STRIP',StripStr);
   Replace(cmdstr,'$SCRIPT','--script='+maybequoted(outputexedir+Info.ScriptName));
   Replace(cmdstr,'$SCRIPT','--script='+maybequoted(outputexedir+Info.ScriptName));
   success:=DoExec(FindUtil(utilsprefix+BinStr),cmdstr,true,false);
   success:=DoExec(FindUtil(utilsprefix+BinStr),cmdstr,true,false);