Return to sym.h CVS log

Up to [Research Unix] / researchv10no / cmd / twig

Annotation of researchv10no/cmd/twig/sym.h, revision 1.1.1.1

1.1       root        1: /* symbol table definitions */
                      2: extern int symbol_undefined;
                      3: 
                      4: /*
                      5:  * A LabelData structures are associated with label symbols.  They
                      6:  * indicate that a tree is labelled with the symbol
                      7:  */
                      8: typedef struct LabelData       LabelData;
                      9: 
                     10: struct LabelData {
                     11:        Node *tree;
                     12:        int treeIndex;
                     13:        int lineno;
                     14:        SymbolEntry *label;     /* back pointer */
                     15:        LabelData *next;
                     16: };
                     17: 
                     18: struct treeassoc {
                     19:        int tree;
                     20:        struct treeassoc *next;
                     21: };
                     22: 
                     23: struct symbol_entry {
                     24:        int hash;
                     25:        char *name;
                     26:        short attr;
                     27: #              define  A_UNDEFINED             0
                     28: #              define  A_NODE                  1
                     29: #              define  A_LABEL                 2
                     30: #              define  A_COST                  3
                     31: #              define  A_ACTION                4
                     32: #                                              define MAXCHAINS     A_CONST    
                     33: #                                              define HAS_UNIQUE(x) (x<MAXCHAINS)
                     34: #              define  A_CONST                 5
                     35: #                                              define HAS_LIST(x) (x<=A_CONST)
                     36: #              define  A_ERROR                 10
                     37: #              define  A_KEYWORD               11
                     38:        short unique;
                     39:        struct symbol_entry *link;
                     40:        struct symbol_entry *next;
                     41:        union {
                     42:                int keyword;
                     43:                int cvalue;     /* a constant's value */
                     44:                int arity;      /* information stored for A_NODE type */
                     45:                LabelData *lp;
                     46:                struct {
                     47:                        int arity;
                     48:                        Code *code;
                     49:                } predData;
                     50:                struct {
                     51:                        struct treeassoc *assoc;
                     52:                        Code *code;
                     53:                } ca;                           /* data for cost/action symbols */
                     54:        } sd;
                     55: };
                     56: 
                     57: extern void SymbolInit();
                     58: extern void SymbolEnter();
                     59: extern SymbolEntry *SymbolLookup();
                     60: extern SymbolEntry *SymbolAllocate();
                     61: extern void SymbolFree();
                     62: extern void SymbolEnterList();
                     63: extern char *SymbolGenUnique();
                     64: 
                     65: extern SymbolEntry ErrorSymbol;
                     66: 
                     67: /*
                     68:  * In order for the walker to access the labelled leaves of a pattern,
                     69:  * a table (mistakenly) called the path table is generated (see sym.c).
                     70:  * This table contains the following possible values:
                     71:  *
                     72:  * ePush       follow the children link in the walker skeleton.
                     73:  * ePop                Pop up to parent.
                     74:  * eNext       follow  the siblings link.
                     75:  * eEval <arg> The current node is a labelled leaf whose label id
                     76:  *             is the integer <arg>.
                     77:  * eStop       All done. stop!
                     78:  *
                     79:  * The table is interpreted by the _getleaves routine in the walker.
                     80:  */
                     81: #define        eSTOP   0
                     82: #define        ePOP    -1
                     83: #define eEVAL  -2
                     84: #define eNEXT  -3
                     85: #define ePUSH  -4

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.