1987-03-09 19:15:41 +00:00
|
|
|
/*
|
|
|
|
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
|
|
|
|
* See the copyright notice in the ACK home directory, in the file "Copyright".
|
|
|
|
*/
|
1994-06-24 11:31:16 +00:00
|
|
|
/* $Id$ */
|
1984-05-17 14:13:06 +00:00
|
|
|
|
1984-05-17 13:42:36 +00:00
|
|
|
struct num {
|
|
|
|
num_p n_next;
|
|
|
|
unsigned n_number;
|
|
|
|
unsigned n_jumps;
|
|
|
|
num_p n_repl;
|
|
|
|
short n_flags;
|
1991-01-31 15:17:04 +00:00
|
|
|
short n_size; /* size of element on top at this label */
|
1984-05-17 13:42:36 +00:00
|
|
|
line_p n_line;
|
|
|
|
};
|
|
|
|
|
|
|
|
/* contents of .n_flags */
|
|
|
|
#define NUMDATA 000001
|
|
|
|
#define NUMREACH 000002
|
|
|
|
#define NUMKNOWN 000004
|
|
|
|
#define NUMMARK 000010
|
|
|
|
#define NUMSCAN 000020
|
1990-07-18 14:33:07 +00:00
|
|
|
#define NUMSET 000040
|
|
|
|
#define NUMCOND 000100
|
1991-01-31 15:17:04 +00:00
|
|
|
#define NUMFALLTHROUGH 000200
|
1984-05-17 13:42:36 +00:00
|
|
|
|
|
|
|
#define NNUMHASH 37
|
|
|
|
extern num_p numlookup();
|
|
|
|
|
|
|
|
struct regs {
|
|
|
|
reg_p r_next;
|
|
|
|
offset r_par[4];
|
|
|
|
};
|
|
|
|
|
|
|
|
typedef struct proinf {
|
|
|
|
offset localbytes;
|
|
|
|
line_p lastline;
|
|
|
|
sym_p symbol;
|
|
|
|
reg_p freg;
|
1984-05-17 14:13:06 +00:00
|
|
|
bool gtoproc;
|
1984-05-17 13:42:36 +00:00
|
|
|
num_p numhash[NNUMHASH];
|
|
|
|
} proinf;
|
|
|
|
|
|
|
|
extern proinf curpro;
|