set stack top to 801FFFF0 as in system.cnf

rtl/ps1/system.pp

@@ -114,7 +114,7 @@ const
 var
   MaxStack: SizeInt;
 begin
-  MaxStack:=SizeInt(PtrUInt($80200000)-PtrUInt(@bss_end))-MinHeap;
+  MaxStack:=SizeInt(PtrUInt($801FFFF0)-PtrUInt(@bss_end))-MinHeap;
   if stklen<MaxStack then
     result:= stklen
   else
@@ -139,7 +139,7 @@ end;
 
 begin
   StackLength:=CheckInitialStkLen(stklen);
-  StackBottom:=Pointer(PtrUInt($80200000)-PtrUInt(StackLength));
+  StackBottom:=Pointer(PtrUInt($801FFFF0)-PtrUInt(StackLength));
 
   { Debug printing via writeln (visible in emulator logs) is possible, so
     pretend to be a console application. }