freepascal rtl fix to work

git-svn-id: svn://kolibrios.org@7625 a494cfbc-eb01-0410-851d-a64ba20cac60
2019-04-10 06:10:13 +00:00
parent 2a3f609db6
commit 24fde9ea89
4 changed files with 13 additions and 1 deletions
--- a/programs/develop/fp/rtl/system.pp
+++ b/programs/develop/fp/rtl/system.pp
@@ -19,6 +19,10 @@ const
  MaxExitCode = 65535;
  MaxPathLen = 512;

+  InitialStkLen = 20480; /// siemargl
+
+
+
  UnusedHandle   : THandle = -1;
  StdInputHandle : THandle = 0;
  StdOutputHandle: THandle = 0;