This intrinsic subprogram is used in the implementation of the
library routine 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.