1# Copyright (c) 1982, 1993
2#	The Regents of the University of California.  All rights reserved.
3#
4# %sccs.include.redist.sh%
5#
6#	@(#)cerror.s	8.1 (Berkeley) 06/06/93
7#
8
9# modified version of cerror
10#
11# The idea is that every time an error occurs in a system call
12# I want a special function "syserr" called.  This function will
13# either print a message and exit or do nothing depending on
14# defaults and use of "onsyserr".
15#
16
17.globl	cerror
18.comm	_errno,4
19
20cerror:
21	movl	d0,_errno
22	jsr	_syserr		| new code
23	moveq	#-1,d0
24	rts
25
26.globl	__mycerror		| clumsy way to get this loaded
27
28__mycerror:
29	.word	0
30	rts
31