mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-10-27 11:51:56 +01:00
* check for array size
This commit is contained in:
parent
cf0fb016c6
commit
f5f187f3a9
10
tests/test/tarray5.pp
Normal file
10
tests/test/tarray5.pp
Normal file
@ -0,0 +1,10 @@
|
|||||||
|
{ %fail }
|
||||||
|
|
||||||
|
var
|
||||||
|
{ This shouldn't be allowed, the number of elements
|
||||||
|
doesn't fit in a aint }
|
||||||
|
mem : array[0..high(aint)] of byte ;
|
||||||
|
|
||||||
|
begin
|
||||||
|
end;
|
||||||
|
|
||||||
Loading…
Reference in New Issue
Block a user