9 lines
82 B
Ada
9 lines
82 B
Ada
|
-- { dg-do run }
|
||
|
|
|
||
|
|
with Tamdt;
|
||
|
|
|
||
|
|
procedure Test_Tamdt is
|
||
|
|
begin
|
||
|
|
Tamdt.Check;
|
||
|
|
end;
|