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

* added 2k buffer for stack checking for correct io on error

Browse Source
This commit is contained in:
carl 1998-07-07 12:33:08 +00:00
parent 34f5f72c53
commit 0e28a46c7c
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
rtl/dos/go32v2/system.pp
View File

@ -151,12 +151,16 @@ procedure int_stackcheck(stack_size:longint);[public,alias: 'STACKCHECK'];
called when trying to get local stack if the compiler directive $S
is set this function must preserve esi !!!! because esi is set by
the calling proc for methods it must preserve all registers !!
With a 2048 byte safe area used to write to StdIo without crossing
the stack boundary
}
begin
asm
pushl %eax
pushl %ebx
movl stack_size,%ebx
addl $2048,%ebx
movl %esp,%eax
subl %ebx,%eax
{$ifdef SYSTEMDEBUG}
@ -1054,7 +1058,10 @@ Begin
End.
{
$Log$
Revision 1.10 1998-07-02 12:29:20 carl
Revision 1.11 1998-07-07 12:33:08 carl
* added 2k buffer for stack checking for correct io on error
Revision 1.10 1998/07/02 12:29:20 carl
* IOCheck for rmdir,chdir and mkdir as in TP
NOTE: I'm pretty SURE this will not compile and link correctly with FPC
0.99.5