[unix-history] / usr / src / libc / sys / access.s

# @(#)access.s	4.1 (Berkeley) 12/21/80
# access(file, request)
#  test ability to access file in all indicated ways
#  1 - read
#  2 - write
#  4 - execute

	.set	access,33
.globl	_access

_access:
	.word	0x0000
	chmk	$access
	bcc 	noerror
	jmp 	cerror
noerror:
	ret
Commit	Line	Data
4b9ccde7	1	# @(#)access.s 4.1 (Berkeley) 12/21/80
9c8fc5ca BJ	2	# access(file, request)
	3	# test ability to access file in all indicated ways
	4	# 1 - read
	5	# 2 - write
	6	# 4 - execute
	7
	8	.set access,33
	9	.globl _access
	10
	11	_access:
	12	.word 0x0000
	13	chmk $access
	14	bcc noerror
	15	jmp cerror
	16	noerror:
	17	ret