with Types; use Types;

package RCI is
   pragma Remote_Call_Interface;

   procedure Wstaw(p: in Wpis);
   pragma Asynchronous(Wstaw);

   function Nazwa(n: in Positive) return String;
end RCI;