1/* 2 * Copyright (c) 1983 Regents of the University of California. 3 * All rights reserved. The Berkeley software License Agreement 4 * specifies the terms and conditions for redistribution. 5 * 6 * @(#)cerror.vax.s 5.2 (Berkeley) 01/12/88 7 * 8 * static char rcsid[] = "$Header: cerror.s,v 1.1 87/03/25 19:27:44 donn Rel $"; 9 * 10 * modified version of cerror 11 * 12 * The idea is that every time an error occurs in a system call 13 * I want a special function "syserr" called. This function will 14 * either print a message and exit or do nothing depending on 15 * defaults and use of "onsyserr". 16 */ 17 18.globl cerror 19.comm _errno,4 20 21cerror: 22 movl r0,_errno 23 calls $0,_syserr /* new code */ 24 mnegl $1,r0 25 ret 26 27.globl __mycerror /* clumsy way to get this loaded */ 28 29__mycerror: 30 .word 0 31 ret 32