merge in latest Linton version

[unix-history] / usr / src / old / dbx / cerror.vax.s

diff --git a/usr/src/old/dbx/cerror.vax.s b/usr/src/old/dbx/cerror.vax.s
index 4e04ffd..a09c64c 100644 (file)
--- a/usr/src/old/dbx/cerror.vax.s
+++ b/usr/src/old/dbx/cerror.vax.s
@@ -1,31 +1,30 @@
-#!/bin/csh -f
-#
-# Copyright (c) 1983 Regents of the University of California.
-# All rights reserved.  The Berkeley software License Agreement
-# specifies the terms and conditions for redistribution.
-#
-#      @(#)cerror.vax.s        5.1 (Berkeley) %G%
-#
-# static char rcsid[] = "$Header: cerror.s,v 1.5 84/12/26 10:38:33 linton Exp $";
-#
-# 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".
-#
+/*
+ * Copyright (c) 1983 Regents of the University of California.
+ * All rights reserved.  The Berkeley software License Agreement
+ * specifies the terms and conditions for redistribution.
+ *
+ *     @(#)cerror.vax.s        5.2 (Berkeley) %G%
+ *
+ * static char rcsid[] = "$Header: cerror.s,v 1.1 87/03/25 19:27:44 donn Rel $";
+ *
+ * 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".
+ */

 
 .globl cerror
 .comm  _errno,4
 
 cerror:
        movl    r0,_errno
 
 .globl cerror
 .comm  _errno,4
 
 cerror:
        movl    r0,_errno

-       calls   $0,_syserr      # new code
+       calls   $0,_syserr      /* new code */

        mnegl   $1,r0
        ret
 
        mnegl   $1,r0
        ret
 

-.globl __mycerror              # clumsy way to get this loaded
+.globl __mycerror              /* clumsy way to get this loaded */

 
 __mycerror:
        .word   0
 
 __mycerror:
        .word   0