diff --git a/src/test.c b/src/test.c
index bbf6b3938c810ed3babf5acb9c60f9a909b290ef..0edbdf483353b545427a87e699d3c071aa3c9644 100644 (file)
--- a/src/test.c
+++ b/src/test.c
"MODULE Test;"
"TYPE"
" Rec = POINTER TO RecDesc;"
- " RecDesc = RECORD x, y, z : INTEGER END;"
+ " RecDesc = RECORD"
+ " x, y, z : INTEGER;"
+ " r : RECORD xxx : INTEGER; END;"
+ " END;"
"VAR"
" a : INTEGER;"
" r : Rec;"
" r.x := a;"
" r.y := r.x;"
" r.z := r.y * 3;"
+ " r.r.xxx := 666;"
"END Test."
;