1: /*
2: * Copyright (c) 1980 Regents of the University of California.
3: * All rights reserved. The Berkeley software License Agreement
4: * specifies the terms and conditions for redistribution.
5: *
6: * @(#)format.h 5.1 (Berkeley) 6/7/85
7: */
8:
9: /*
10: * format parser definitions
11: */
12:
13: struct syl
14: {
15: short op,p1,p2,rpcnt;
16: };
17:
18: /* do NOT change this defines or add new ones without
19: * changing the value of the following define for OP_TYPE_TAB.
20: * change format.h both in the compiler and libI77 simultaneously.
21: */
22:
23:
24: #define RET 1
25: #define REVERT 2
26: #define GOTO 3
27: #define X 4
28: #define SLASH 5
29: #define STACK 6
30: #define I 7
31: #define ED 8
32: #define NED 9
33: #define IM 10
34: #define APOS 11
35: #define H 12
36: #define TL 13
37: #define TR 14
38: #define T 15
39: #define COLON 16
40: #define S 17
41: #define SP 18
42: #define SS 19
43: #define P 20
44: #define BNZ 21
45: #define B 22
46: #define F 23
47: #define E 24
48: #define EE 25
49: #define D 26
50: #define DE 27 /*** NOT STANDARD FORTRAN ***/
51: #define G 28
52: #define GE 29
53: #define L 30
54: #define A 31
55: #define AW 32
56: #define R 33 /*** NOT STANDARD FORTRAN ***/
57: #define DOLAR 34 /*** NOT STANDARD FORTRAN ***/
58: #define SU 35 /*** NOT STANDARD FORTRAN ***/
59:
60: #define FMTUNKN -1
61: #define FMTOK 1
62: #define FMTERR 0
63:
64: #define FMT_COMP 0x101 /* indicates pre-compiled formats */
65:
66: extern struct syl syl[];
67: extern int parenlvl,revloc;
68: extern short pc;
Defined struct's
syl
defined in line
13; used 8 times
Defined macros
A
defined in line
54; used 2 times
APOS
defined in line
34; used 1 times
AW
defined in line
55; used 1 times
B
defined in line
45; used 1 times
BNZ
defined in line
44; used 2 times
COLON
defined in line
39; used 1 times
D
defined in line
49; used 1 times
DE
defined in line
50; used 1 times
DOLAR
defined in line
57; used 1 times
E
defined in line
47; used 1 times
ED
defined in line
31;
never used
EE
defined in line
48; used 1 times
F
defined in line
46; used 1 times
FMTERR
defined in line
62; used 15 times
FMTOK
defined in line
61; used 5 times
G
defined in line
51; used 1 times
GE
defined in line
52; used 1 times
GOTO
defined in line
26; used 1 times
H
defined in line
35; used 1 times
I
defined in line
30; used 1 times
IM
defined in line
33; used 1 times
L
defined in line
53; used 1 times
NED
defined in line
32;
never used
P
defined in line
43; used 2 times
R
defined in line
56; used 5 times
RET
defined in line
24; used 1 times
S
defined in line
40; used 1 times
SLASH
defined in line
28; used 1 times
SP
defined in line
41; used 1 times
SS
defined in line
42; used 1 times
STACK
defined in line
29; used 1 times
SU
defined in line
58; used 1 times
T
defined in line
38; used 2 times
TL
defined in line
36; used 1 times
TR
defined in line
37; used 1 times
X
defined in line
27; used 2 times
Usage of this include