소스 검색

* partial fix #40934: don't remove the DEF file if cs_link_deffile is set (thus if the user explicitly wants the file)

Sven/Sarah Barth 9 달 전
부모
커밋
ef16a99c08
1개의 변경된 파일1개의 추가작업 그리고 1개의 파일을 삭제
  1. 1 1
      compiler/gendef.pas

+ 1 - 1
compiler/gendef.pas

@@ -70,7 +70,7 @@ end;
 destructor tdeffile.destroy;
 begin
   if WrittenOnDisk and
-     not(cs_link_nolink in current_settings.globalswitches) then
+     ([cs_link_nolink,cs_link_deffile]*current_settings.globalswitches=[]) then
     DeleteFile(FName);
   importlist.Free;
   exportlist.Free;