old-cross-binutils/gdb/testsuite/gdb.ada/bar.ads
Joel Brobecker f0aaee4940 * gdb.ada (bar.ads, bar.adb, null_record.adb): New files.
* gdb.ada (null_record.exp): New testcase.
2004-04-01 00:58:00 +00:00

8 lines
83 B
Ada

package Bar is
type Empty is null record;
procedure Do_Nothing;
end Bar;