|
|
1.1 ! root 1: ! 2: # Copyright (c) 1982 Regents of the University of California ! 3: # ! 4: # static char sccsid[] = "@(#)cerror.s 1.3 9/2/82"; ! 5: # ! 6: # modified version of cerror ! 7: # ! 8: # The idea is that every time an error occurs in a system call ! 9: # I want a special function "syserr" called. This function will ! 10: # either print a message and exit or do nothing depending on ! 11: # defaults and use of "onsyserr". ! 12: # ! 13: ! 14: .globl cerror ! 15: .comm _errno,4 ! 16: ! 17: cerror: ! 18: movl d0,_errno ! 19: jsr _syserr | new code ! 20: moveq #-1,d0 ! 21: rts ! 22: ! 23: .globl __mycerror | clumsy way to get this loaded ! 24: ! 25: __mycerror: ! 26: .word 0 ! 27: rts
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.