Browse Source

fix when FPC_USE_LIBC is disabled not call PASCALMAIN

Jinyang He 2 years ago
parent
commit
bad62d51fa
1 changed files with 4 additions and 5 deletions
  1. 4 5
      rtl/linux/loongarch64/si_prc.inc

+ 4 - 5
rtl/linux/loongarch64/si_prc.inc

@@ -85,13 +85,12 @@ procedure _FPC_proc_start; assembler; nostackframe; public name '_start';
     la.got $t0, initialstkptr
     la.got $t0, initialstkptr
     st.d $sp, $t0, 0
     st.d $sp, $t0, 0
 
 
-{$if defined(FPC_USE_LIBC)}
-    { call PascalMain }
-    bl PASCALMAIN
-{$else}
+{$if not defined(FPC_USE_LIBC)}
     bl InitTLS
     bl InitTLS
 {$endif}
 {$endif}
-{$endif}
+
+    { call PascalMain }
+    bl PASCALMAIN
     break 1
     break 1
   end;
   end;