mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-10-19 19:31:41 +02:00
10 lines
161 B
ObjectPascal
10 lines
161 B
ObjectPascal
program bug0036;
|
|
|
|
{Discovered by Daniel Mantione.}
|
|
|
|
var a:array[0..31] of char;
|
|
|
|
begin
|
|
a:=' '; {Incorrect Pascal statement, but why a protection error?}
|
|
end.
|