1988-10-26 15:21:11 +00:00
|
|
|
/* M I S C E L L A N E O U S */
|
|
|
|
|
|
|
|
|
|
#define is_anon_idf(x) ((x)->id_text[0] == '#')
|
|
|
|
|
#define id_not_declared(x) (not_declared("identifier", (x), ""))
|
|
|
|
|
|
|
|
|
|
extern struct idf
|
|
|
|
|
*gen_anon_idf();
|
|
|
|
|
|
|
|
|
|
extern char
|
|
|
|
|
*gen_proc_name();
|
1989-05-03 10:30:22 +00:00
|
|
|
|
|
|
|
|
extern char *symbol2str();
|
|
|
|
|
extern arith NewInt();
|
|
|
|
|
extern arith NewPtr();
|
|
|
|
|
extern arith CodeBeginBlock();
|
|
|
|
|
extern arith EnterParamList();
|
|
|
|
|
extern arith EnterParTypes();
|
|
|
|
|
extern arith CodeInitFor();
|
|
|
|
|
extern arith IsString();
|
