testsuite/gnat.dg/incomplete7.adb

--  { dg-do compile }

package body Incomplete7 is
   procedure Foo is null;
end Incomplete7;