package Alog.Exceptions is
type Exception_Handler is not null access procedure (Except : Ada.Exceptions.Exception_Occurrence; Caller : Ada.Task_Identification.Task_Id);