[Gm2] GM2 ISO

[Iztok]

MODULE realbitscast;

FROM SYSTEM IMPORT CAST;

TYPE
   BITS32 = SET OF [0..31];
   BITS64 = SET OF [0..63];
   REAL32 = SHORTREAL;
   REAL64 = REAL;

VAR
   b32 : BITS32;
   b64 : BITS64;
   r32 : REAL32;
   r64 : REAL64;

BEGIN
 b32 := CAST(BITS32,r32);
 b64 := CAST(BITS32,r64);
END realbitscast.


> gm2 -Wiso -c -I. realbitscast.mod
realbitscast.mod: In function `_M2_realbitscast_init':
realbitscast.mod:17: Internal compiler error in convert_move, at expr.c:502
Please report this crash to the GNU Modula-2 mailing list <address@hidden>

I.