blob: 9b41c3a548ff0ea34bd3ba4cb3617e54a713cdc4 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
{ Old file: tbs0116.pp }
{ when local variable size is > $ffff, enter can't be used to create the stack frame, but it is with -Og }
Procedure test;
{compile with -Og to show bug}
Var a: Array[1..4000000] of longint;
Begin
End;
Begin
End.
|