/* * Copyright (c) 1983 The Regents of the University of California. * All rights reserved. * * Redistribution and use in source and binary forms are permitted * provided that the above copyright notice and this paragraph are * duplicated in all such forms and that any documentation, * advertising materials, and other materials related to such * distribution and use acknowledge that the software was developed * by the University of California, Berkeley. The name of the * University may not be used to endorse or promote products derived * from this software without specific prior written permission. * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. * * @(#)cerror.iris.s 5.2 (Berkeley) %G% */ /* * modified version of cerror * * The idea is that every time an error occurs in a system call * I want a special function "syserr" called. This function will * either print a message and exit or do nothing depending on * defaults and use of "onsyserr". */ .comm _errno,4 .globl cerror cerror: movl d0,_errno jbsr _syserr /* new code */ moveq #-1,d0 rts .globl __mycerror /* clumsy way to get this loaded */ __mycerror: rts