pascal
/
freepascal.compiler
mirror da https://gitlab.com/freepascal.org/fpc/source.git


			
				
					
						
						
							123456789
							Procedure test;
{compile with -Og to show bug}

Var a: Array[1..4000000] of longint;
Begin
End;

Begin
End.