1@x l.35
2int main()
3@y
4int main(void)
5@z
6
7@x l.123
8static void fill_buf()
9@y
10static void fill_buf(void)
11@z
12
13@x l.185
14static char *imap="0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ\
15abcdefghijklmnopqrstuvwxyz_^~&@@,;.:?!%#$+-*/|\\<=>()[]{}`'\" \n";
16@y
17static char *imap=
18   "0123456789"@|
19   "ABCDEFGHIJKLMNOPQRSTUVWXYZ"@|
20   "abcdefghijklmnopqrstuvwxyz"@|
21   "_^~&@@,;.:?!%#$+-*/|\\<=>()[]{}`'\" \n";
22@z
23
24@x l.191
25char imap_chr(d)
26  long d;
27{
28  return d<0 || d>strlen(imap)? '\0': imap[d];
29}
30@y
31char imap_chr(long d)
32{
33  return((char)(d<0 || d>strlen(imap)? '\0': imap[d]));
34}
35@z
36
37@x l.197
38long imap_ord(c)
39  char c;
40@y
41long imap_ord(char c)
42@z
43
44@x l.206
45extern char imap_chr(); /* the character that maps to a given character */
46extern long imap_ord(); /* the ordinal number of a given character */
47@y
48extern char imap_chr(long); /* the character that maps to a given character */
49extern long imap_ord(char); /* the ordinal number of a given character */
50@z
51
52@x l.213
53static void icode_setup()
54@y
55static void icode_setup(void)
56@z
57
58@x l.225
59extern void gb_newline(); /* advance to next line of the data file */
60extern long new_checksum(); /* compute change in magic number */
61@y
62extern void gb_newline(void); /* advance to next line of the data file */
63extern long new_checksum(char *,long); /* compute change in magic number */
64@z
65
66@x l.232
67long new_checksum(s,old_checksum)
68  char *s; /* a string */
69  long old_checksum;
70@y
71long new_checksum(@t\1\1@>
72  char *s, /* a string */
73  long old_checksum@t\2\2@>)
74@z
75
76@x l.245
77void gb_newline()
78@y
79void gb_newline(void)
80@z
81
82@x l.259
83extern long gb_eof(); /* has the data all been read? */
84@y
85extern long gb_eof(void); /* has the data all been read? */
86@z
87
88@x l.260
89long gb_eof() { return !more_data; }
90@y
91long gb_eof(void) { return !more_data; }
92@z
93
94@x l.276
95extern char gb_char(); /* get next character of current line, or |'\n'| */
96extern void gb_backup(); /* move back ready to scan a character again */
97@y
98extern char gb_char(void); /* get next character of current line, or |'\n'| */
99extern void gb_backup(void); /* move back ready to scan a character again */
100@z
101
102@x l.280
103char gb_char()
104@y
105char gb_char(void)
106@z
107
108@x l.286
109void gb_backup()
110@y
111void gb_backup(void)
112@z
113
114@x l.307
115extern long gb_digit(); /* |gb_digit(d)| reads a digit between 0 and |d-1| */
116extern unsigned long gb_number(); /* |gb_number(d)| reads a radix-|d| number */
117@y
118extern long gb_digit(char); /* |gb_digit(d)| reads a digit between 0 and |d-1| */
119extern unsigned long gb_number(char); /* |gb_number(d)| reads a radix-|d| number */
120@z
121
122@x l.315
123long gb_digit(d)
124    char d;
125@y
126long gb_digit(char d)
127@z
128
129@x l.322
130unsigned long gb_number(d)
131    char d;
132@y
133unsigned long gb_number(char d)
134@z
135
136@x l.353
137extern char *gb_string(); /* |gb_string(p,c)| reads a string delimited by |c|
138@y
139extern char *gb_string(char *,char);
140  /* |gb_string(p,c)| reads a string delimited by |c|
141@z
142
143@x l.360
144char *gb_string(p,c)
145    char *p; /* where to put the result */
146    char c; /* character following the string */
147@y
148char *gb_string(@t\1\1@>
149  char *p, /*  where to put the result */
150  char c@t\2\2@>) /* character following the string */
151@z
152
153@x l.427
154extern void gb_raw_open(); /* open a file for GraphBase input */
155extern long gb_open(); /* open a GraphBase data file; return 0 if OK */
156@y
157extern void gb_raw_open(char *); /* open a file for GraphBase input */
158extern long gb_open(char *); /* open a GraphBase data file; return 0 if OK */
159@z
160
161@x l.431
162void gb_raw_open(f)
163    char *f;
164@y
165void gb_raw_open(char *f)
166@z
167
168@x l.463
169long gb_open(f)
170    char *f;
171@y
172long gb_open(char *f)
173@z
174
175@x l.534
176long gb_close()
177@y
178long gb_close(void)
179@z
180
181@x l.567
182extern long gb_close(); /* close a GraphBase data file; return 0 if OK */
183extern long gb_raw_close(); /* close file and return the checksum */
184@y
185extern long gb_close(void); /* close a GraphBase data file; return 0 if OK */
186extern long gb_raw_close(void); /* close file and return the checksum */
187@z
188
189@x l.571
190long gb_raw_close()
191@y
192long gb_raw_close(void)
193@z
194