Browse Source

fix store stacklength but not its addr in info

Jinyang He 2 years ago
parent
commit
2928837225

+ 1 - 0
rtl/linux/loongarch64/si_c.inc

@@ -78,6 +78,7 @@ procedure main_stub; assembler; nostackframe;
     la.got, $t0, SysInitEntryInformation
     st.d $sp, $t0, TEntryInformation.OS.stkptr
     la.got $t1, StackLength
+    ld.d $t1, $t1, 0
     st.d $t1, $t0, TEntryInformation.OS.stklen
     la.got $t2, _FPC_libc_haltproc
     st.d $t2, $t0, TEntryInformation.OS.haltproc

+ 1 - 0
rtl/linux/loongarch64/si_g.inc

@@ -77,6 +77,7 @@ procedure main_stub; assembler; nostackframe;
     la.got, $t0, SysInitEntryInformation
     st.d $sp, $t0, TEntryInformation.OS.stkptr
     la.got $t1, StackLength
+    ld.d $t1, $t1, 0
     st.d $t1, $t0, TEntryInformation.OS.stklen
     la.got $t2, _FPC_libc_haltproc
     st.d $t2, $t0, TEntryInformation.OS.haltproc

+ 1 - 0
rtl/linux/loongarch64/si_prc.inc

@@ -50,6 +50,7 @@ procedure _FPC_proc_start; assembler; nostackframe; public name '_start';
 
     st.d $sp, $t1, TEntryInformation.OS.stkptr
     la.got $t0, StackLength
+    ld.d $t0, $t0, 0
     st.d $t0, $t1, TEntryInformation.OS.stklen
     la.got $t2, _FPC_proc_haltproc
     st.d $t2, $t1, TEntryInformation.OS.haltproc