paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-02 07:49:32 +01:00
Code Issues Packages Projects Releases Wiki Activity

* test fixed to turn off stack checking in stack checking error handling

Browse Source 
git-svn-id: trunk@4565 -
This commit is contained in:
florian 2006-09-07 20:10:32 +00:00
parent 86cc5ec31b
commit 9dd9ba53b9
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
tests/test/tstack.pp
View File

@ -22,6 +22,8 @@ const
saveexit : pointer = nil; saveexit : pointer = nil;
x : longint = 0; x : longint = 0;
{$S-}
{ the stack overflowed already so don't do much here and depend on stack_margin }
procedure stack_check_exit; procedure stack_check_exit;
begin begin