This intrinsic subprogram is used in the implementation of the
library routine 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.File to obtain the name of the current
file.