Ver Fonte

* asmscript stuff under if ldnoresponsfile. Fixes FreeBSD breakage

git-svn-id: trunk@9332 -
marco há 18 anos atrás
pai
commit
1a34960b53
1 ficheiros alterados com 5 adições e 2 exclusões
  1. 5 2
      compiler/systems/t_bsd.pas

+ 5 - 2
compiler/systems/t_bsd.pas

@@ -640,8 +640,11 @@ begin
   if (success) and not(cs_link_nolink in current_settings.globalswitches) then
    begin
      DeleteFile(outputexedir+Info.ResName);
-     DeleteFile(linkscript.fn);
-     linkscript.free
+     if LdSupportsNoResponseFile Then
+       begin
+         DeleteFile(linkscript.fn);
+         linkscript.free
+       end; 
    end;
 
   MakeExecutable:=success;   { otherwise a recursive call to link method }