|
|
1.1 ! root 1: /********************************************************************* ! 2: * COPYRIGHT NOTICE * ! 3: ********************************************************************** ! 4: * This software is copyright (C) 1982 by Pavel Curtis * ! 5: * * ! 6: * Permission is granted to reproduce and distribute * ! 7: * this file by any means so long as no fee is charged * ! 8: * above a nominal handling fee and so long as this * ! 9: * notice is always included in the copies. * ! 10: * * ! 11: * Other rights are reserved except as explicitly granted * ! 12: * by written permission of the author. * ! 13: * Pavel Curtis * ! 14: * Computer Science Dept. * ! 15: * 405 Upson Hall * ! 16: * Cornell University * ! 17: * Ithaca, NY 14853 * ! 18: * * ! 19: * Ph- (607) 256-4934 * ! 20: * * ! 21: * Pavel.Cornell@Udel-Relay (ARPAnet) * ! 22: * decvax!cornell!pavel (UUCPnet) * ! 23: *********************************************************************/ ! 24: ! 25: /* ! 26: * comp_error.c -- Error message routines ! 27: * ! 28: * $Log: comp_error.c,v $ ! 29: * Revision 1.8 93/04/12 14:12:56 bin ! 30: * Udo: third color update ! 31: * ! 32: * Revision 1.2 92/04/13 14:35:55 bin ! 33: * update by vlad ! 34: * ! 35: * Revision 2.1 82/10/25 14:45:31 pavel ! 36: * Added Copyright Notice ! 37: * ! 38: * Revision 2.0 82/10/24 15:16:32 pavel ! 39: * Beta-one Test Release ! 40: * ! 41: * Revision 1.3 82/08/23 22:29:31 pavel ! 42: * The REAL Alpha-one Release Version ! 43: * ! 44: * Revision 1.2 82/08/19 19:09:44 pavel ! 45: * Alpha Test Release One ! 46: * ! 47: * Revision 1.1 82/08/12 18:36:02 pavel ! 48: * Initial revision ! 49: * ! 50: * ! 51: */ ! 52: ! 53: #ifdef RCSHDR ! 54: static char RCSid[] = ! 55: "$Header: /src386/usr/lib/ncurses/RCS/comp_error.c,v 1.8 93/04/12 14:12:56 bin Exp Locker: bin $"; ! 56: #endif ! 57: ! 58: #include "compiler.h" ! 59: ! 60: extern char *string_table; ! 61: extern short term_names; ! 62: ! 63: ! 64: warning(fmt, a1, a2, a3, a4, a5, a6) ! 65: char *fmt, *a1, *a2, *a3, *a4, *a5, *a6; ! 66: { ! 67: fprintf (stderr, "tic: Warning: near line %d: ", curr_line); ! 68: fprintf (stderr, "terminal '%s', ", string_table+term_names); ! 69: fprintf (stderr, fmt, a1, a2, a3, a4, a5, a6); ! 70: fprintf (stderr, "\n"); ! 71: } ! 72: ! 73: ! 74: err_abort(fmt, a1, a2, a3, a4, a5, a6) ! 75: char *fmt, *a1, *a2, *a3, *a4, *a5, *a6; ! 76: { ! 77: fprintf (stderr, "tic: Line %d: ", curr_line); ! 78: fprintf (stderr, "terminal '%s', ", string_table+term_names); ! 79: fprintf (stderr, fmt, a1, a2, a3, a4, a5, a6); ! 80: fprintf (stderr, "\n"); ! 81: exit(1); ! 82: } ! 83: ! 84: ! 85: syserr_abort(fmt, a1, a2, a3, a4, a5, a6) ! 86: char *fmt, *a1, *a2, *a3, *a4, *a5, *a6; ! 87: { ! 88: fprintf (stderr, "PROGRAM ERROR: Line %d: ", curr_line); ! 89: fprintf (stderr, "terminal '%s', ", string_table+term_names); ! 90: fprintf (stderr, fmt, a1, a2, a3, a4, a5, a6); ! 91: fprintf (stderr, "\n"); ! 92: abort(); ! 93: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.