ack/mach/pdp/libsys/close.s

#include "sys.h"
.define	_close
.extern	_errno

_close:
	mov	2(sp),r0
	sys	close
	bcc	1f
	mov	r0,_errno
	mov	$-1,r0
	rts	pc
1:
	clr	r0
	rts	pc
Initial revision 1987-01-07 17:13:41 +00:00			`#include "sys.h"`
converted to ACK assembler format 1987-05-14 17:45:41 +00:00			`.define _close`
			`.extern _errno`
Initial revision 1987-01-07 17:13:41 +00:00
			`_close:`
			`mov 2(sp),r0`
			`sys close`
converted to ACK assembler format 1987-05-14 17:45:41 +00:00			`bcc 1f`
Initial revision 1987-01-07 17:13:41 +00:00			`mov r0,_errno`
			`mov $-1,r0`
			`rts pc`
			`1:`
			`clr r0`
			`rts pc`