[Gm2] Problem with defined types

[Waldek Hebisch]

First, thanks for fixes for previous problems. Now I have another
problem. The following module:

MODULE ttd;

TYPE tL = RECORD m :INTEGER END;

TYPE tT = tL;

PROCEDURE T ( t: tT):INTEGER;
   BEGIN
     RETURN t.m;
   END T;

BEGIN
END ttd.

gives me:

src5$ ../../gm2-lin2/gcc/xgm2 -B../../gm2-lin2/gcc/ 
-I.:../../gcc-3.3.3/gcc/gm2/gm2-libs -c ttd.mod
ttd.mod:9:tT is not a record type

Similarely:

MODULE tte;

TYPE tL = ARRAY [0..1] OF INTEGER;

TYPE tT = tL;

PROCEDURE T ( t: tT):INTEGER;
   BEGIN
     RETURN t[0];
   END T;

BEGIN
END tte.
MODULE tte;

TYPE tL = ARRAY [0..1] OF INTEGER;

TYPE tT = tL;

PROCEDURE T ( t: tT):INTEGER;
   BEGIN
     RETURN t[0];
   END T;

BEGIN
END tte.

gives me:

src5$ ../../gm2-lin2/gcc/xgm2 -B../../gm2-lin2/gcc/ 
-I.:../../gcc-3.3.3/gcc/gm2/gm2-libs -c tte.mod
tte.mod:9:can only index Static or Dynamic arrays


-- 
                              Waldek Hebisch
address@hidden