Return to wait.s CVS log

Up to [Research Unix] / researchv9 / libc / nsys

researchv9-SUN3(old)

# C library -- wait

# pid = wait(0);
#   or,
# pid = wait(&status);
#
# pid == -1 if error
# status indicates fate of process, if given

	wait = 7
.globl	_wait
.globl  cerror

_wait:
	linkw	a6,#0
	pea	wait
	trap	#0
	bcc 	noerror
	jmp 	cerror
noerror:
	tstl	sp@(8)		| status desired?
	beql	nostatus	| no
	movl	sp@(8),a0
	movl	d1,a0@		| store child's status
nostatus:
	unlk	a6
	rts

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