Browse Source

+ bug0151

Jonas Maebe 27 years ago
parent
commit
87c3c1aa04
2 changed files with 15 additions and 4 deletions
  1. 10 0
      bugs/bug0151.pp
  2. 5 4
      bugs/readme.txt

+ 10 - 0
bugs/bug0151.pp

@@ -0,0 +1,10 @@
+type tr = record
+            l1, l2: longint
+          end;
+          
+var r: tr;
+
+begin
+  with r do
+    inc(l)
+end.

+ 5 - 4
bugs/readme.txt

@@ -196,7 +196,8 @@ bug0144.pp   problem with 'with object do'
 bug0145.pp   typed files with huges records (needs filerec.size:longint)
 bug0146.pp   no sizeof() for var arrays and the size is pushed incorrect
 bug0147.pp   function b; is not allowed in implementation
-bug0148.pp   triple fault exception when setting function result of a declared
-             but not yet implemented function in another function
-bug0149.pp  (a, b) compile bug0149b twice and you'll get a triple exc. fault
-bug0150.pp  Shows that the assert() macro is missing under Delphi.
+bug0148.pp   crash when setting function result of a declared but not yet
+             implemented function in another function
+bug0149.pp   (a, b) compile bug0149b twice and you'll get a crash
+bug0150.pp   Shows that the assert() macro is missing under Delphi.
+bug0151.pp   crash when using undeclared variable in with-statement