1: /*
2: char id_format[] = "@(#)format.h 1.1";
3: *
4: * format parser definitions
5: */
6:
7: struct syl
8: {
9: int op,p1,p2,p3;
10: };
11:
12: #define RET 1
13: #define REVERT 2
14: #define GOTO 3
15: #define X 4
16: #define SLASH 5
17: #define STACK 6
18: #define I 7
19: #define ED 8
20: #define NED 9
21: #define IM 10
22: #define APOS 11
23: #define H 12
24: #define TL 13
25: #define TR 14
26: #define T 15
27: #define COLON 16
28: #define S 17
29: #define SP 18
30: #define SS 19
31: #define P 20
32: #define BN 21
33: #define BZ 22
34: #define F 23
35: #define E 24
36: #define EE 25
37: #define D 26
38: #define DE 27 /*** NOT STANDARD FORTRAN ***/
39: #define G 28
40: #define GE 29
41: #define L 30
42: #define A 31
43: #define AW 32
44: #define R 33 /*** NOT STANDARD FORTRAN ***/
45: #define DOLAR 34 /*** NOT STANDARD FORTRAN ***/
46: #define SU 35 /*** NOT STANDARD FORTRAN ***/
47:
48: #define FMTOK 1
49: #define FMTERR 0
50:
51: extern struct syl syl[];
52: extern int pc,parenlvl,revloc;
Defined struct's
syl
defined in line
7; used 16 times
Defined macros
A
defined in line
42; used 1 times
APOS
defined in line
22; used 1 times
AW
defined in line
43; used 1 times
BN
defined in line
32; used 2 times
BZ
defined in line
33; used 1 times
COLON
defined in line
27; used 1 times
D
defined in line
37; used 1 times
DE
defined in line
38; used 1 times
DOLAR
defined in line
45; used 1 times
E
defined in line
35; used 1 times
ED
defined in line
19; used 1 times
EE
defined in line
36; used 1 times
F
defined in line
34; used 1 times
FMTERR
defined in line
49; used 10 times
FMTOK
defined in line
48; used 3 times
G
defined in line
39; used 1 times
GE
defined in line
40; used 1 times
GOTO
defined in line
14; used 1 times
H
defined in line
23; used 1 times
I
defined in line
18; used 1 times
IM
defined in line
21; used 1 times
L
defined in line
41; used 1 times
NED
defined in line
20; used 1 times
P
defined in line
31; used 2 times
R
defined in line
44; used 2 times
RET
defined in line
12; used 1 times
S
defined in line
28; used 1 times
SLASH
defined in line
16; used 1 times
SP
defined in line
29; used 1 times
SS
defined in line
30; used 1 times
STACK
defined in line
17; used 2 times
SU
defined in line
46; used 1 times
T
defined in line
26; used 2 times
TL
defined in line
24; used 1 times
TR
defined in line
25; used 1 times
X
defined in line
15; used 2 times
Usage of this include