Return to r.h CVS log

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

Annotation of researchv10dc/cmd/ratfor/r.h, revision 1.1

1.1     ! root        1: #include <stdio.h>
        !             2: #include <ctype.h>
        !             3: #include <string.h>
        !             4: #include "y.tab.h"
        !             5: 
        !             6: #
        !             7: #define        putbak(c)       *ip++ = c
        !             8: /*     #define getchr()        (ip>ibuf?*--ip: getc(infile[infptr]))   */
        !             9: 
        !            10: #define        LET     1
        !            11: #define        DIG     2
        !            12: #define        COMMENT '#'
        !            13: #define        QUOTE   '"'
        !            14: 
        !            15: extern int     transfer;
        !            16: 
        !            17: #define        INDENT  3       /* indent delta */
        !            18: #define        CONTFLD 6       /* default position of continuation character */
        !            19: extern int     contfld;        /* column for continuation char */
        !            20: extern int     contchar;
        !            21: extern int     dbg;
        !            22: extern int     yyval;
        !            23: extern int     *yypv;
        !            24: extern int     yylval;
        !            25: extern int     errorflag;
        !            26: extern int     f77;
        !            27: 
        !            28: extern char    comment[];      /* save input comments here */
        !            29: extern int     comptr; /* next free slot in comment */
        !            30: extern int     printcom;       /* print comments, etc., if on */
        !            31: extern int     indent; /* level of nesting for indenting */
        !            32: 
        !            33: extern char    ibuf[];
        !            34: extern char    *ip;
        !            35: 
        !            36: extern FILE    *outfil;        /* output file id */
        !            37: extern FILE    *infile[];
        !            38: extern char    *curfile[];
        !            39: extern int     infptr;
        !            40: extern int     linect[];
        !            41: 
        !            42: extern char    fcname[];
        !            43: 
        !            44: extern int     svargc;
        !            45: extern char    **svargv;
        !            46: 
        !            47: #define EOS 0
        !            48: #define        HSHSIZ  101
        !            49: struct nlist {
        !            50:        char    *name;
        !            51:        char    *def;
        !            52:        int     ydef;
        !            53:        struct  nlist *next;
        !            54: };
        !            55: 
        !            56: struct nlist   *lookup();
        !            57: char   *install();
        !            58: char   *malloc();
        !            59: extern char    *fcnloc;
        !            60: extern char    *FCN1loc;
        !            61: 

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