M2compiler-V3/compiler/tests/t_enumdecl.mod

MODULE TEnumDecl;
TYPE Color = (Red, Green, Blue);
VAR e : Color;
VAR ExitCode : INTEGER;
BEGIN
  e := Red;
  ExitCode := 0
END TEnumDecl.