|
@@ -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 }
|