This intrinsic subprogram is used in the implementation of the
library package GNAT.Source_Info
. 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.Source_Info.Enclosing_Entity
to obtain the name of
the current subprogram, package, task, entry, or protected subprogram.