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