Browse Source

* fixed the stack traces under linux (StackTop wasn't initialized)

git-svn-id: trunk@25861 -
nickysn 11 years ago
parent
commit
714ca3a61d
1 changed files with 2 additions and 1 deletions
  1. 2 1
      rtl/linux/system.pp

+ 2 - 1
rtl/linux/system.pp

@@ -351,8 +351,9 @@ begin
 {$endif}
 {$endif}
   IsConsole := TRUE;
+  StackTop := initialstkptr;
   StackLength := CheckInitialStkLen(initialStkLen);
-  StackBottom := initialstkptr - StackLength;
+  StackBottom := StackTop - StackLength;
   { Set up signals handlers (may be needed by init code to test cpu features) }
   InstallSignals;
 {$if defined(cpui386) or defined(cpuarm)}