paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-10-25 21:22:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

* check for array size

Browse Source
This commit is contained in:
peter 2004-11-02 07:43:22 +00:00
parent cf0fb016c6
commit f5f187f3a9
1 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
tests/test/tarray5.pp Normal file
View 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;