separate (P)
protected body PO_Stub_1 is
   entry Nonblocking_Stub_Entry when True is
   begin
      null;
   end Nonblocking_Stub_Entry;

   procedure Nonblocking_Stub_Proc is
   begin
      null;
   end Nonblocking_Stub_Proc;
end PO_Stub_1;
