浏览代码

+ Added bug #186

michael 27 年之前
父节点
当前提交
7d5cd410ba
共有 2 个文件被更改,包括 10 次插入0 次删除
  1. 9 0
      bugs/bug0186.pp
  2. 1 0
      bugs/readme.txt

+ 9 - 0
bugs/bug0186.pp

@@ -0,0 +1,9 @@
+  program bug0186;
+   var
+    endline:^integer;
+    line:array [1..endline^] of ^char;
+   begin
+    new (endline);
+    endline^:=5;  
+    endline^:=10;
+   end.

+ 1 - 0
bugs/readme.txt

@@ -247,3 +247,4 @@ bug0169.pp   missing new(type) support for not object/class
 bug0171.pp   missing typecasting in constant expressions
 bug0183.pp   internal error 10
 bug0185.pp   missing range checking for Val and subrange types
+bug0186.pp   Erroneous array syntax is accepted.