File: alog-exceptions.ads

## Documentation

Table of Contents
Class Inheritance Tree

1.     --

2.     --  Copyright (c) 2011,

3.     --  Reto Buerki, Adrian-Ken Rueegsegger

4.     --

5.     --  This file is part of Alog.

6.     --

7.     --  Alog is free software; you can redistribute it and/or modify

8.     --  it under the terms of the GNU Lesser General Public License as published

9.     --  by the Free Software Foundation; either version 2.1 of the License, or

10.     --  (at your option) any later version.

11.     --

12.     --  Alog is distributed in the hope that it will be useful,

13.     --  but WITHOUT ANY WARRANTY; without even the implied warranty of

14.     --  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

15.     --  GNU Lesser General Public License for more details.

16.     --

17.     --  You should have received a copy of the GNU Lesser General Public License

18.     --  along with Alog; if not, write to the Free Software

19.     --  Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,

20.     --  MA  02110-1301  USA

21.     --

23.     with Ada.Exceptions;

24.     with Ada.Task_Identification;

26.     --  Alog exception package. Contains type definitions for Alog specific

27.     --  exception handling.

28.     package Alog.ExceptionsTo API docTo spec is

30.        type Exception_Handler is not null access procedure

31.          (Except : Ada.Exceptions.Exception_Occurrence;

32.           Caller : Ada.Task_Identification.Task_Id);

33.        --  Exception handler callback procedure. Used to register custom callback

34.        --  procedures in active and tasked loggers.

36.     end Alog.ExceptionsTo API docTo spec;