CALL GetLog(Login)
Login: CHARACTER; scalar; INTENT(OUT).
Intrinsic groups: unix.
Description:
Returns the login name for the process in Login.
Caution: On some systems, the getlogin(3)
function, which this intrinsic calls at run time,
is either not implemented or returns a null pointer.
In the latter case, this intrinsic returns blanks
in Login.