home *** CD-ROM | disk | FTP | other *** search
- /*--------------------------------------------------------------------*/
- /* b u g o u t . c */
- /* */
- /* Support routines for UUPC/extended */
- /* */
- /* Changes Copyright 1990, 1991 (c) Andrew H. Derbyshire */
- /* */
- /* History: */
- /* 21Nov1991 Break out of lib.c ahd */
- /*--------------------------------------------------------------------*/
-
- #include <stdio.h>
- #include <stdlib.h>
- #include <string.h>
- #include <time.h>
-
- /*--------------------------------------------------------------------*/
- /* UUPC/extended include files */
- /*--------------------------------------------------------------------*/
-
- #include "lib.h"
-
- /*--------------------------------------------------------------------*/
- /* b u g o u t */
- /* */
- /* Perform a panic() exit from UUPC/extended */
- /*--------------------------------------------------------------------*/
-
- void bugout( const size_t lineno, const char *fname )
- {
- printmsg(0,"Program aborting at line %d in file %s",
- lineno, fname );
- fputc('\a',stderr);
- fcloseall();
- exit(69);
- } /*bugout */
-