index 178327ecf317a2ad3298036bf70b59a620c1af39..8f3edc4aec855db2d7e30c6f1b24d0f45ece44c3 100644 (file)
--- a/test.c
+++ b/test.c
""
"TYPE"
" MyInt = INTEGER;"
- " MyRec = RECORD"
+ " MyRec = POINTER TO RECORD"
" a : MyInt;"
+ " next : MyRec;"
" END;"
- " MyRecPtr = POINTER TO MyRec;"
+ ""
+ "VAR"
+ " r : MyRec;"
""
"BEGIN"
" "