File:  [Research Unix] / researchv10no / libc / sys / getlog.s
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Tue Apr 24 17:21:35 2018 UTC (8 years, 1 month ago) by root
Branches: belllabs, MAIN
CVS tags: researchv10, HEAD
researchv10 Norman

	.set	getlog,64+3

	.globl	_getlogname
_getlogname:
	.word	0
	clrl	-(sp)
1:
	pushl	4(ap)
	pushl	$2
	movl	sp,ap
	chmk	$getlog
	bcc	noerror
	jmp	cerror
noerror:
	clrl	r0
	ret

	.globl	_setlogname
_setlogname:
	.word	0
	pushl	$1
	brb	1b

unix.superglobalmegacorp.com

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