|
|
1.1 ! root 1: #!/bin/csh -f ! 2: # ! 3: # Copyright (c) 1983 Regents of the University of California. ! 4: # All rights reserved. The Berkeley software License Agreement ! 5: # specifies the terms and conditions for redistribution. ! 6: # ! 7: # @(#)cerror.s 5.1 (Berkeley) 5/31/85 ! 8: # ! 9: # static char rcsid[] = "$Header: cerror.s,v 1.5 84/12/26 10:38:33 linton Exp $"; ! 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: ! 22: cerror: ! 23: movl r0,_errno ! 24: calls $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
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.