* gnat.dg/slice5.adb: New test.

[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gnat.dg / const1.adb

--  { dg-do compile }

procedure const1 is
   Def_Const : constant Integer;
   pragma Import (Ada, Def_Const);
begin
   null;
end const1;