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

10 lines
139 B
Text
Raw Normal View History

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;