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

+ WASI: set StackBottom on startup

Browse Source
This commit is contained in:
Nikolay Nikolov 2024-08-06 04:02:03 +03:00
parent 60bb6c19d9
commit 68f4191119
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
rtl/wasi/system.pp
View File

@ -431,6 +431,7 @@ end;
begin
StackLength:=CheckInitialStkLen(stklen);
StackBottom:=Pointer(PtrUInt(InitialHeapBlockStart)-PtrUInt(StackLength));
{ To be set if this is a GUI or console application }
IsConsole := TRUE;
{$ifdef FPC_HAS_FEATURE_DYNLIBS}