Return to m4ext.c CVS log

Up to [Research Unix] / researchv10dc / cmd / m4

Annotation of researchv10dc/cmd/m4/m4ext.c, revision 1.1

1.1     ! root        1: #include       <stdio.h>
        !             2: #include       "m4.h"
        !             3: 
        !             4: 
        !             5: /* storage params */
        !             6: int    hshsize         = 199;          /* hash table size (prime) */
        !             7: int    bufsize         = 4096;         /* pushback & arg text buffers */
        !             8: int    stksize         = 100;          /* call stack */
        !             9: int    toksize         = 512;          /* biggest word ([a-z_][a-z0-9_]*) */
        !            10: 
        !            11: 
        !            12: /* pushback buffer */
        !            13: char   *ibuf;                          /* buffer */
        !            14: char   *ibuflm;                        /* highest buffer addr */
        !            15: char   *ip;                            /* current position */
        !            16: char   *ipflr;                         /* buffer floor */
        !            17: char   *ipstk[10];                     /* stack for "ipflr"s */
        !            18: 
        !            19: 
        !            20: /* arg collection buffer */
        !            21: char   *obuf;                          /* buffer */
        !            22: char   *obuflm;                        /* high address */
        !            23: char   *op;                            /* current position */
        !            24: 
        !            25: 
        !            26: /* call stack */
        !            27: struct call    *callst;                /* stack */
        !            28: struct call    *Cp     = NULL;         /* position */
        !            29: 
        !            30: 
        !            31: /* token storage */
        !            32: char   *token;                         /* buffer */
        !            33: char   *toklm;                         /* high addr */
        !            34: 
        !            35: 
        !            36: /* file name and current line storage for line sync and diagnostics */
        !            37: char   fnbuf[200];                     /* holds file name strings */
        !            38: char   *fname[11]      = {fnbuf};      /* file name ptr stack */
        !            39: int    fline[10];                      /* current line nbr stack */
        !            40: 
        !            41: 
        !            42: /* input file stuff for "include"s */
        !            43: FILE   *ifile[10]      = {stdin};      /* stack */
        !            44: int    ifx;                            /* stack index */
        !            45: 
        !            46: 
        !            47: /* stuff for output diversions */
        !            48: FILE   *cf     = stdout;               /* current output file */
        !            49: FILE   *ofile[11]      = {stdout};     /* output file stack */
        !            50: int    ofx;                            /* stack index */
        !            51: 
        !            52: 
        !            53: /* comment markers */
        !            54: char   lcom[MAXSYM+1]  = "#";
        !            55: char   rcom[MAXSYM+1]  = "\n";
        !            56: 
        !            57: 
        !            58: /* quote markers */
        !            59: char   lquote[MAXSYM+1]        = "`";
        !            60: char   rquote[MAXSYM+1]        = "'";
        !            61: 
        !            62: 
        !            63: /* argument ptr stack */
        !            64: char   **argstk;
        !            65: char   **astklm;                       /* high address */
        !            66: char   **Ap;                           /* current position */
        !            67: 
        !            68: 
        !            69: /* symbol table */
        !            70: struct nlist   **hshtab;               /* hash table */
        !            71: int    hshval;                         /* last hash val */
        !            72: 
        !            73: 
        !            74: /* misc */
        !            75: char   *procnam;                       /* argv[0] */
        !            76: char   *tempname;                      /* used for diversion files */
        !            77: char   *Wrapstr;                       /* last pushback string for "m4wrap" */
        !            78: char   nullstr[]       = "";
        !            79: int    C;                              /* see "m4.h" macros */
        !            80: int    nflag   = 1;                    /* name flag, used for line sync code */
        !            81: int    sflag;                          /* line sync flag */
        !            82: int    sysrval;                        /* return val from syscmd */
        !            83: int    trace;                          /* global trace flag */
        !            84: 
        !            85: 
        !            86: char   aofmsg[]        = "more than %d chars of argument text";
        !            87: char   astkof[]        = "more than %d items on argument stack";
        !            88: char   badfile[]       = "can't open file";
        !            89: char   nocore[]        = "out of storage";
        !            90: char   pbmsg[]         = "pushed back more than %d chars";
        !            91: 
        !            92: 
        !            93: /* char map */
        !            94: char   type[]  = {
        !            95:        0,      0,      0,      0,      0,      0,      0,      0,
        !            96:        0,      SPACE,  SPACE,  SPACE,  SPACE,  SPACE,  0,      0,
        !            97:        0,      0,      0,      0,      0,      0,      0,      0,
        !            98:        0,      0,      0,      0,      0,      0,      0,      0,
        !            99:        SPACE,  0,      0,      0,      0,      0,      0,      0,
        !           100:        0,      0,      0,      0,      0,      0,      0,      0,
        !           101:        DIG,    DIG,    DIG,    DIG,    DIG,    DIG,    DIG,    DIG,
        !           102:        DIG,    DIG,    0,      0,      0,      0,      0,      0,
        !           103:        0,      ALPH,   ALPH,   ALPH,   ALPH,   ALPH,   ALPH,   ALPH,
        !           104:        ALPH,   ALPH,   ALPH,   ALPH,   ALPH,   ALPH,   ALPH,   ALPH,
        !           105:        ALPH,   ALPH,   ALPH,   ALPH,   ALPH,   ALPH,   ALPH,   ALPH,
        !           106:        ALPH,   ALPH,   ALPH,   0,      0,      0,      0,      ALPH,
        !           107:        0,      ALPH,   ALPH,   ALPH,   ALPH,   ALPH,   ALPH,   ALPH,
        !           108:        ALPH,   ALPH,   ALPH,   ALPH,   ALPH,   ALPH,   ALPH,   ALPH,
        !           109:        ALPH,   ALPH,   ALPH,   ALPH,   ALPH,   ALPH,   ALPH,   ALPH,
        !           110:        ALPH,   ALPH,   ALPH,   0,      0,      0,      0,      0,
        !           111: };

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