[unix-history] / usr / src / cmd / lisp / vsyscall.s

	.globl	_vsyscall
	.globl	cerror
_vsyscall:
	.word	0x0000
	movl	4(ap),r0		# point at arg array
	movl	(r0)+,r1		# syscall number	
	movl	$10,r2
Loop:
	pushl	(r0)[r2]			# push argument
	sobgeq	r2,Loop			# push 10 arguments	
	pushl	$10				# arg count
	movl	sp,ap			# point at args	
	chmk	r1				# do it
	bcs		L1
	ret
L1:
	jmp		cerror
Commit	Line	Data
18d1c3cd JF	1	.globl _vsyscall
	2	.globl cerror
	3	_vsyscall:
	4	.word 0x0000
	5	movl 4(ap),r0 # point at arg array
	6	movl (r0)+,r1 # syscall number
	7	movl $10,r2
	8	Loop:
	9	pushl (r0)[r2] # push argument
	10	sobgeq r2,Loop # push 10 arguments
	11	pushl $10 # arg count
	12	movl sp,ap # point at args
	13	chmk r1 # do it
	14	bcs L1
	15	ret
	16	L1:
	17	jmp cerror