old-cross-binutils/gdb/testsuite/gdb.chill/misc.ch
1999-04-16 01:35:26 +00:00

12 lines
162 B
Text

misc_tests : MODULE;
DCL otto INT := 42;
DCL foo STRUCT (l LONG, c CHAR, b BOOL, s CHARS(3));
dummyfunc: PROC();
END dummyfunc;
dummyfunc();
END misc_tests;