ソースを参照

rtl/morphos: do not try to use the section keyword on 3.2.x that doesn't support it. this allows bootstrapping natively with 3.2.x again.

Karoly Balogh 1 ヶ月 前
コミット
dd6d142f4c
1 ファイル変更1 行追加1 行削除
  1. 1 1
      rtl/morphos/si_prc.pp

+ 1 - 1
rtl/morphos/si_prc.pp

@@ -41,7 +41,7 @@ procedure PascalMainEntry; cdecl; forward;
   all .text.* section, so if we link any object with an unnamed .text
   all .text.* section, so if we link any object with an unnamed .text
   section, this won't be at the start of the executable, and we get
   section, this won't be at the start of the executable, and we get
   crashes. (KB) }
   crashes. (KB) }
-function _FPC_proc_start: longint; cdecl; public name '_start'; section '.text';
+function _FPC_proc_start: longint; cdecl; public name '_start'; {$IFNDEF VER3_2}section '.text';{$ENDIF}
 var
 var
   sst: TStackSwapStruct;
   sst: TStackSwapStruct;
   newStack: Pointer;
   newStack: Pointer;