enum.ch   [plain text]

hugo: module

  synmode m_set = set (a, b, c, d, e, f, g, h, i);
  dcl x long;
  dcl y m_set;

  writetext (stdout, "done.%/");

end hugo;