1: character*8 getlog 2: integer getuid, getgid, getpid 3: write(*,*) "I am", getlog(), "uid:", getuid(), "gid:", getgid() 4: write(*,*) "This is process", getpid() 5: end
|
Last modified: 1983-06-20
Generated: 2016-12-26 |
Generated by src2html V0.67
page hit count: 313 |
|