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