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