package body Pkg is

   procedure Foo (P : P_Type) is
   begin
      null;
   end Foo;

   procedure Bar (X : A) is
   begin
      null;
   end Bar;

   procedure Baz (S : UTF_8_Lines) is null;

end Pkg;
