소스 검색

sinclairql: make sure the Sinclair QL defaults to vlink

git-svn-id: trunk@47520 -
Károly Balogh 4 년 전
부모
커밋
ebb199b9d4
1개의 변경된 파일5개의 추가작업 그리고 0개의 파일을 삭제
  1. 5 0
      compiler/options.pas

+ 5 - 0
compiler/options.pas

@@ -3417,6 +3417,11 @@ begin
       not LinkerSetExplicitly then
      include(init_settings.globalswitches,cs_link_vlink);
 {$endif}
+{$ifdef m68k}
+   if (target_info.system in [system_m68k_sinclairql]) and
+      not LinkerSetExplicitly then
+     include(init_settings.globalswitches,cs_link_vlink);
+{$endif m68k}
 end;
 
 procedure TOption.checkoptionscompatibility;