package body Test is
   function Baz (A : Integer) return Boolean is separate;
   procedure Bar is separate;
end Test;
