package Alog.Protected_Containers is
type Log_Request_Storage is private;
type Exception_Storage is limited private;
procedure Put
| ( | Element | : Log_Request.Instance); |
entry Get
| ( | Element | : out Log_Request.Instance); |
procedure Done;
entry All_Done;
procedure Clear;
function Length return Natural;
function Pending return Natural;
procedure Insert
| ( | Key | : Ada.Task_Identification.Task_Id; |
| Item | : Ada.Exceptions.Exception_Occurrence_Access); |
procedure Get
| ( | Key | : Ada.Task_Identification.Task_Id; |
| Element | : out Ada.Exceptions.Exception_Occurrence); |
function Is_Empty return Boolean;
procedure Clear;