Retro68/gcc/gcc/testsuite/gnat.dg/varsize3_2.adb
2017-04-10 13:32:00 +02:00

12 lines
143 B
Ada

-- { dg-do compile }
with Varsize3_Pkg1; use Varsize3_Pkg1;
procedure Varsize3_2 is
Filter : constant Object := True;
begin
null;
end;