Return to idtst.f CVS log

Up to [CSRG BSD Unix] / 42BSD / usr.lib / libU77 / test

BSD 4.2

	character*8 getlog
	integer getuid, getgid, getpid
	write(*,*) "I am", getlog(), "uid:", getuid(), "gid:", getgid()
	write(*,*) "This is process", getpid()
	end

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.