package Alog.Active_Logger is
type Instance (Init : Boolean) is tagged limited private;
procedure Attach_Facility
| ( | Logger | : in out Instance; |
| Facility | : Facilities.Handle); |
procedure Attach_Default_Facility
| ( | Logger | : in out Instance); |
procedure Detach_Facility
| ( | Logger | : in out Instance; |
| Name | : String); |
procedure Detach_Default_Facility
| ( | Logger | : in out Instance); |
function Facility_Count
| ( | Logger | : Instance) return Natural; |
procedure Update
| ( | Logger | : in out Instance; |
| Name | : String; | |
| Process | : Tasked_Logger.Facility_Update_Handle); |
procedure Iterate
| ( | Logger | : in out Instance; |
| Process | : Tasked_Logger.Facility_Update_Handle); |
procedure Attach_Transform
| ( | Logger | : in out Instance; |
| Transform | : Transforms.Handle); |
procedure Detach_Transform
| ( | Logger | : in out Instance; |
| Name | : String); |
function Transform_Count
| ( | Logger | : Instance) return Natural; |
procedure Clear
| ( | Logger | : in out Instance); |
function Get_Queue_Length
| ( | Logger | : Instance) return Natural; |
procedure Shutdown
| ( | Logger | : in out Instance; |
| Flush | : Boolean := True); |
function Is_Terminated
| ( | Logger | : Instance) return Boolean; |
procedure All_Done
| ( | Logger | : in out Instance); |
procedure Set_Except_Handler
| ( | Logger | : Instance; |
| Proc | : Exceptions.Exception_Handler); |