Ada Programming/Libraries/Ada.Exceptions
The package Ada.Exceptions allows you to analyze exceptions you have caught, to raise exceptions with an associated message or to save exceptions occurrences for later processing.
Usage
The following example shows how to implement a "last resort" error handler which just displays the information related to the error which occurred.
with Ada.Exceptions; procedure Numeric_6 is package Exept renames Ada.Exceptions; ... exception when An_Exception : others => T_IO.Put_Line (Exept.Exception_Information (An_Exception)); end Try;