ubuntu-buildroot/output/build/host-gcc-initial-11.4.0/gcc/testsuite/gnat.dg/ghost1.adb

--  { dg-do compile }

package body Ghost1 is
   procedure Body_Only (Obj : Ghost_Typ) is null
     with Ghost;

   procedure Spec_And_Body (Obj : Ghost_Typ) is null;
end Ghost1;