|
|
1.1 root 1: \File{ryinit\-error.c},{22:23},{Jun 12 1988}
2: \L{\LB{...}}
3: \L{\LB{}}
4: \L{\LB{\K{void}}\Tab{8}{ros\_adios (rop, event)}}
5: \L{\LB{\K{register} \K{struct} RoSAPpreject *rop;}}
6: \L{\LB{\K{char} *event;}}
7: \L{\LB{\{}}
8: \L{\LB{ ros\_advise (rop, event);}}
9: \L{\LB{}}
10: \L{\LB{ \_exit (1);}}
11: \L{\LB{\}}}
12: \L{\LB{}}
13: \L{\LB{}}
14: \L{\LB{\K{void}}\Tab{8}{ros\_advise (rop, event)}}
15: \L{\LB{\K{register} \K{struct} RoSAPpreject *rop;}}
16: \L{\LB{\K{char} *event;}}
17: \L{\LB{\{}}
18: \L{\LB{ \K{char} buffer[BUFSIZ];}}
19: \L{\LB{}}
20: \L{\LB{ \K{if} (rop \-\> rop\_cc \> 0)}}
21: \L{\LB{}\Tab{8}{(\K{void}) sprintf (buffer, \S{}\"[\%s] \%*.*s\"\SE{}, RoErrString (rop \-\> rop\_reason),}}
22: \L{\LB{}\Tab{16}{rop \-\> rop\_cc, rop \-\> rop\_cc, rop \-\> rop\_data);}}
23: \L{\LB{ \K{else}}}
24: \L{\LB{}\Tab{8}{(\K{void}) sprintf (buffer, \S{}\"[\%s]\"\SE{}, RoErrString (rop \-\> rop\_reason));}}
25: \L{\LB{}}
26: \L{\LB{ advise (NULLCP, \S{}\"\%s: \%s\"\SE{}, event, buffer);}}
27: \L{\LB{\}}}
28: \L{\LB{}}
29: \L{\LB{}}
30: \L{\LB{\K{void}}\Tab{8}{acs\_adios (aca, event)}}
31: \L{\LB{\K{register} \K{struct} AcSAPabort *aca;}}
32: \L{\LB{\K{char} *event;}}
33: \L{\LB{\{}}
34: \L{\LB{ acs\_advise (aca, event);}}
35: \L{\LB{}}
36: \L{\LB{ \_exit (1);}}
37: \L{\LB{\}}}
38: \L{\LB{}}
39: \L{\LB{}}
40: \L{\LB{\K{void}}\Tab{8}{acs\_advise (aca, event)}}
41: \L{\LB{\K{register} \K{struct} AcSAPabort *aca;}}
42: \L{\LB{\K{char} *event;}}
43: \L{\LB{\{}}
44: \L{\LB{ \K{char} buffer[BUFSIZ];}}
45: \L{\LB{}}
46: \L{\LB{ \K{if} (aca \-\> aca\_cc \> 0)}}
47: \L{\LB{}\Tab{8}{(\K{void}) sprintf (buffer, \S{}\"[\%s] \%*.*s\"\SE{},}}
48: \L{\LB{}\Tab{16}{AcErrString (aca \-\> aca\_reason),}}
49: \L{\LB{}\Tab{16}{aca \-\> aca\_cc, aca \-\> aca\_cc, aca \-\> aca\_data);}}
50: \L{\LB{ \K{else}}}
51: \L{\LB{}\Tab{8}{(\K{void}) sprintf (buffer, \S{}\"[\%s]\"\SE{}, AcErrString (aca \-\> aca\_reason));}}
52: \L{\LB{}}
53: \L{\LB{}\Tab{8}{advise (NULLCP, \S{}\"\%s: \%s (source \%d)\"\SE{}, event, buffer,}}
54: \L{\LB{}\Tab{16}{aca \-\> aca\_source);}}
55: \L{\LB{\}}}
56: \L{\LB{}}
57: \L{\LB{}}
58: \L{\LB{\K{\#ifndef}}\Tab{8}{lint}}
59: \L{\LB{\K{void}}\Tab{8}{\_advise ();}}
60: \L{\LB{}}
61: \L{\LB{}}
62: \L{\LB{\K{void}}\Tab{8}{adios (va\_alist)}}
63: \L{\LB{va\_dcl}}
64: \L{\LB{\{}}
65: \L{\LB{ va\_list ap;}}
66: \L{\LB{}}
67: \L{\LB{ va\_start (ap);}}
68: \L{\LB{}}
69: \L{\LB{ \_advise (ap);}}
70: \L{\LB{}}
71: \L{\LB{ va\_end (ap);}}
72: \L{\LB{}}
73: \L{\LB{ \_exit (1);}}
74: \L{\LB{\}}}
75: \L{\LB{\K{\#else}}}
76: \L{\LB{\C{}\/* VARARGS *\/\CE{}}}
77: \L{\LB{}}
78: \L{\LB{\K{void}}\Tab{8}{adios (what, fmt)}}
79: \L{\LB{\K{char} *what,}}
80: \L{\LB{ *fmt;}}
81: \L{\LB{\{}}
82: \L{\LB{ adios (what, fmt);}}
83: \L{\LB{\}}}
84: \L{\LB{\K{\#endif}}}
85: \L{\LB{}}
86: \L{\LB{}}
87: \L{\LB{\K{\#ifndef}}\Tab{8}{lint}}
88: \L{\LB{\K{void}}\Tab{8}{advise (va\_alist)}}
89: \L{\LB{va\_dcl}}
90: \L{\LB{\{}}
91: \L{\LB{ va\_list ap;}}
92: \L{\LB{}}
93: \L{\LB{ va\_start (ap);}}
94: \L{\LB{}}
95: \L{\LB{ \_advise (ap);}}
96: \L{\LB{}}
97: \L{\LB{ va\_end (ap);}}
98: \L{\LB{\}}}
99: \L{\LB{}}
100: \L{\LB{}}
101: \L{\LB{\K{static} \K{void} \_advise (ap)}}
102: \L{\LB{va\_list}\Tab{8}{ap;}}
103: \L{\LB{\{}}
104: \L{\LB{ \K{char} buffer[BUFSIZ];}}
105: \L{\LB{}}
106: \L{\LB{ asprintf (buffer, ap);}}
107: \L{\LB{}}
108: \L{\LB{ (\K{void}) fflush (stdout);}}
109: \L{\LB{}}
110: \L{\LB{ fprintf (stderr, \S{}\"\%s: \"\SE{}, myname);}}
111: \L{\LB{ (\K{void}) fputs (buffer, stderr);}}
112: \L{\LB{ (\K{void}) fputc (\S{}\'\!n\'\SE{}, stderr);}}
113: \L{\LB{}}
114: \L{\LB{ (\K{void}) fflush (stderr);}}
115: \L{\LB{\}}}
116: \L{\LB{\K{\#else}}}
117: \L{\LB{\C{}\/* VARARGS *\/\CE{}}}
118: \L{\LB{}}
119: \L{\LB{\K{void}}\Tab{8}{advise (what, fmt)}}
120: \L{\LB{\K{char} *what,}}
121: \L{\LB{ *fmt;}}
122: \L{\LB{\{}}
123: \L{\LB{ advise (what, fmt);}}
124: \L{\LB{\}}}
125: \L{\LB{\K{\#endif}}}
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.