Browse Source

* asmscript stuff under if ldnoresponsfile. Fixes FreeBSD breakage

git-svn-id: trunk@9332 -
marco 17 years ago
parent
commit
1a34960b53
1 changed files with 5 additions and 2 deletions
  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
   if (success) and not(cs_link_nolink in current_settings.globalswitches) then
    begin
    begin
      DeleteFile(outputexedir+Info.ResName);
      DeleteFile(outputexedir+Info.ResName);
-     DeleteFile(linkscript.fn);
-     linkscript.free
+     if LdSupportsNoResponseFile Then
+       begin
+         DeleteFile(linkscript.fn);
+         linkscript.free
+       end; 
    end;
    end;
 
 
   MakeExecutable:=success;   { otherwise a recursive call to link method }
   MakeExecutable:=success;   { otherwise a recursive call to link method }