Forráskód Böngészése

* check for array size

peter 21 éve
szülő
commit
f5f187f3a9
1 módosított fájl, 10 hozzáadás és 0 törlés
  1. 10 0
      tests/test/tarray5.pp

+ 10 - 0
tests/test/tarray5.pp

@@ -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;
+