f0aaee4940
* gdb.ada (null_record.exp): New testcase.
8 lines
83 B
Ada
8 lines
83 B
Ada
|
|
package Bar is
|
|
|
|
type Empty is null record;
|
|
|
|
procedure Do_Nothing;
|
|
|
|
end Bar;
|