1987-04-29 10:22:07 +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".
|
|
|
|
|
*
|
|
|
|
|
* Author: Ceriel J.H. Jacobs
|
|
|
|
|
*/
|
|
|
|
|
|
1986-06-20 14:36:49 +00:00
|
|
|
/* P A R S E T R E E W A L K E R */
|
|
|
|
|
|
1987-04-29 10:22:07 +00:00
|
|
|
/* $Header$ */
|
|
|
|
|
|
1986-06-20 14:36:49 +00:00
|
|
|
/* Definition of WalkNode macro
|
|
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
extern int (*WalkTable[])();
|
|
|
|
|
|
1989-03-20 13:32:06 +00:00
|
|
|
#define WalkNode(xnd, xlab, rch) (*WalkTable[(xnd)->nd_class])((xnd), (xlab),(rch))
|
1986-06-20 14:36:49 +00:00
|
|
|
|
|
|
|
|
extern label text_label;
|
|
|
|
|
extern label data_label;
|
1987-09-23 16:39:43 +00:00
|
|
|
|
1987-11-09 16:11:04 +00:00
|
|
|
#include "squeeze.h"
|
|
|
|
|
|
1987-09-23 16:39:43 +00:00
|
|
|
#ifndef SQUEEZE
|
|
|
|
|
#define c_loc(x) C_loc((arith) (x))
|
|
|
|
|
#define c_lae_dlb(x) C_lae_dlb(x,(arith) 0)
|
1988-06-13 10:29:36 +00:00
|
|
|
#define CAL(nm, sz) (C_cal(nm), C_asp((arith)(sz)))
|
1993-11-19 09:53:47 +00:00
|
|
|
#define c_bra(x) C_bra((label) (x))
|
1987-09-23 16:39:43 +00:00
|
|
|
#endif
|
