File:  [Research Unix] / researchv9 / libc / nsys / getlog.s
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Tue Apr 24 17:22:00 2018 UTC (8 years, 1 month ago) by root
Branches: belllabs, MAIN
CVS tags: researchv9-SUN3_old, researchv9-SUN3, HEAD
researchv9-SUN3(old)

	getlog = 64+3

	.globl	_getlogname
_getlogname:
	linkw	a6,#0
	pea	0
1:
	movl	sp@(12),sp@-
	jsr	2f
	addql	#8,sp
	unlk	a6
	rts
2:
	linkw	a6,#0
	pea	getlog
	trap	#0
	bcc	noerror
noerror:
	clrl	d0
	unlk	a6
	rts
	
	.globl	_setlogname
_setlogname:
	linkw	a6,#0
	pea	1
	bra	1b

unix.superglobalmegacorp.com

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