فهرست منبع

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

git-svn-id: trunk@4565 -
florian 19 سال پیش
والد
کامیت
9dd9ba53b9
1فایلهای تغییر یافته به همراه2 افزوده شده و 0 حذف شده
  1. 2 0
      tests/test/tstack.pp

+ 2 - 0
tests/test/tstack.pp

@@ -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