projects / unix-history / blame
| Commit | Line | Data |
|---|---|---|
| 1945cd56 | 1 | Original BTL Ratfor System for 4.2 |
| 476fcd16 SL |
2 | /* r.h 1.2 83/08/11 */ |
| 3 | ||
| 1945cd56 CC |
4 | #include <stdio.h> |
| 5 | #include "y.tab.h" | |
| 6 | ||
| 7 | # | |
| 8 | #define putbak(c) *ip++ = c | |
| 9 | /* #define getchr() (ip>ibuf?*--ip: getc(infile[infptr])) */ | |
| 10 | ||
| 11 | #define LET 1 | |
| 12 | #define DIG 2 | |
| 13 | #define CRAP 3 | |
| 14 | #define COMMENT '#' | |
| 15 | #define QUOTE '"' | |
| 16 | ||
| 17 | extern int transfer; | |
| 18 | ||
| 19 | #define INDENT 3 /* indent delta */ | |
| 20 | #ifdef gcos | |
| 21 | #define CONTFLD 6 | |
| 22 | #endif | |
| 23 | #ifdef unix | |
| 24 | #define CONTFLD 1 | |
| 25 | #endif | |
| 26 | extern int contfld; /* column for continuation char */ | |
| 27 | extern int contchar; | |
| 28 | extern int dbg; | |
| 29 | extern int yyval; | |
| 30 | extern int *yypv; | |
| 31 | extern int yylval; | |
| 32 | extern int errorflag; | |
| 33 | ||
| 34 | extern char comment[]; /* save input comments here */ | |
| 35 | extern int comptr; /* next free slot in comment */ | |
| 36 | extern int printcom; /* print comments, etc., if on */ | |
| 37 | extern int indent; /* level of nesting for indenting */ | |
| 38 | ||
| 39 | extern char ibuf[]; | |
| 40 | extern char *ip; | |
| 41 | ||
| 42 | extern FILE *outfil; /* output file id */ | |
| 43 | extern FILE *infile[]; | |
| 44 | extern char *curfile[]; | |
| 45 | extern int infptr; | |
| 46 | extern int linect[]; | |
| 47 | ||
| 48 | extern char fcname[]; | |
| 49 | ||
| 50 | extern int svargc; | |
| 51 | extern char **svargv; | |
| 52 | ||
| 53 | #define EOS 0 | |
| 54 | #define HSHSIZ 101 | |
| 55 | struct nlist { | |
| 56 | char *name; | |
| 57 | char *def; | |
| 58 | int ydef; | |
| 59 | struct nlist *next; | |
| 60 | }; | |
| 61 | ||
| 62 | struct nlist *lookup(); | |
| 63 | char *install(); | |
| 64 | char *malloc(); | |
| 65 | extern char *fcnloc; | |
| 66 | ||
| 67 | extern char type[]; |