old-cross-binutils/gdb/testsuite/gdb.chill/enum.ch

9 lines
139 B
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;