Ver código fonte

* check for array size

peter 21 anos atrás
pai
commit
f5f187f3a9
1 arquivos alterados com 10 adições e 0 exclusões
  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;
+