该子例程的调用方式如下所示:
call getlog( name )
name
character*n
输出
用户的登录名,如果运行的进程已与终端分离,则全为空白。n 应足够大,以便能容纳最长的名称。
示例:getlog:
character*18 name call getlog( name ) write(*,*) "’", name, "’" end
另请参见 getlogin(3)。