|
|
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.