This intrinsic subprogram is used in the implementation of the
library package GNAT.Current_Exception
. The only useful
use of the intrinsic import in this case is the one in this unit,
so an application program should simply call the function
GNAT.Current_Exception.Exception_Name
to obtain
the name of the current exception.