X-Git-Url: http://deadsoftware.ru/gitweb?p=dsw-obn.git;a=blobdiff_plain;f=test.c;h=8f3edc4aec855db2d7e30c6f1b24d0f45ece44c3;hp=178327ecf317a2ad3298036bf70b59a620c1af39;hb=8520fd72cf3c1daeabbb8da91290dae85fc39c91;hpb=342c8f1a44765e744c64e14a3b8f1aa4031c5f62

diff --git a/test.c b/test.c
index 178327e..8f3edc4 100644
--- a/test.c
+++ b/test.c
@@ -7,10 +7,13 @@ static const char source[] =
 	""
 	"TYPE"
 	"	MyInt = INTEGER;"
-	"	MyRec = RECORD"
+	"	MyRec = POINTER TO RECORD"
 	"		a : MyInt;"
+	"		next : MyRec;"
 	"	END;"
-	"	MyRecPtr = POINTER TO MyRec;"
+	""
+	"VAR"
+	"	r : MyRec;"
 	""
 	"BEGIN"
 	"	"