russell: C:/Users/Dennis/src/lang/russell.orig/src/stree/stptrs.m Source File

00001 # define NOTYPEDEFS
00002 
00003 # include "../parm.h"
00004 
00005 /*
00006  * stptrs declaration macros for use with streedefs.h
00007  *  declares an array of bit vectors identifying those fields
00008  *  which are considered to be pointers for reference count
00009  *  purposes.
00010  */
00011 
00012 # define TOP unsigned stptrs[] = {
00013 
00014 # define START(x,y) 0 \
00015 #       set SHIFT WORDLENGTH \
00016 #       decr SHIFT
00017 
00018 # define DECSHIFT \
00019 #   decr SHIFT
00020 
00021 # define INT(fld) DECSHIFT
00022 # define UNSIGNED(fld) DECSHIFT
00023 # define NODESTAR(fld) +(1<<SHIFT) DECSHIFT
00024 # define HNODESTAR(fld) NODESTAR(fld)
00025 # define SIG(fld) NODESTAR(fld)
00026 # define HSIG(fld) NODESTAR(fld)
00027 # define CNSTAR(fld) DECSHIFT
00028 # define REFCNT(fld) DECSHIFT
00029 # define NODEKIND(fld) DECSHIFT
00030 # define VLINENO(fld) DECSHIFT
00031 # define STTINDX(fld) DECSHIFT
00032 # define LISTPTR(fld) NODESTAR(fld)
00033 # define HLISTPTR(fld) DECSHIFT
00034 # define LBACKREF(fld) DECSHIFT
00035 # define BACKREF(fld) DECSHIFT
00036 # define BITVECTOR(fld) DECSHIFT
00037 # define STRPTR(fld) DECSHIFT
00038 # define HSTRPTR(fld) DECSHIFT
00039 # define NBPTR(fld) NODESTAR(fld)
00040 
00041 # define FINISH ,
00042 
00043 # define BOTTOM };
00044 
00045 # include "streedefs.h"