paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-14 20:29:14 +02:00
Code Issues Packages Projects Releases Wiki Activity

* initialise StackLength (fixes stack checking in general, and tw2897 in

Browse Source 
particular)
This commit is contained in:
Jonas Maebe 2004-07-17 15:31:03 +00:00
parent 0ba2497f24
commit dbedc97141
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
rtl/bsd/system.pp
View File

@ -190,6 +190,7 @@ end;
Begin Begin
IsConsole := TRUE; IsConsole := TRUE;
IsLibrary := FALSE; IsLibrary := FALSE;
StackLength := InitialStkLen;
StackBottom := Sptr - StackLength; StackBottom := Sptr - StackLength;
{ Set up signals handlers } { Set up signals handlers }
InstallSignals; InstallSignals;
@ -212,7 +213,11 @@ End.
{ {
$Log$ $Log$
Revision 1.18 2004-07-03 22:49:34 daniel Revision 1.19 2004-07-17 15:31:03 jonas
* initialise StackLength (fixes stack checking in general, and tw2897 in
particular)
Revision 1.18 2004/07/03 22:49:34 daniel
* Moved declarations downwards * Moved declarations downwards
Revision 1.17 2004/07/03 22:44:37 daniel Revision 1.17 2004/07/03 22:44:37 daniel