BSD 4_3 development
authorCSRG <csrg@ucbvax.Berkeley.EDU>
Thu, 11 Aug 1983 14:02:03 +0000 (06:02 -0800)
committerCSRG <csrg@ucbvax.Berkeley.EDU>
Thu, 11 Aug 1983 14:02:03 +0000 (06:02 -0800)
Work on file usr/src/usr.bin/ratfor/r.h

Synthesized-from: CSRG/cd1/4.3

usr/src/usr.bin/ratfor/r.h [new file with mode: 0644]

diff --git a/usr/src/usr.bin/ratfor/r.h b/usr/src/usr.bin/ratfor/r.h
new file mode 100644 (file)
index 0000000..5a466db
--- /dev/null
@@ -0,0 +1,66 @@
+/*     r.h     1.2     83/08/11        */
+
+#include <stdio.h>
+#include "y.tab.h"
+
+#
+#define        putbak(c)       *ip++ = c
+/*     #define getchr()        (ip>ibuf?*--ip: getc(infile[infptr]))   */
+
+#define        LET     1
+#define        DIG     2
+#define        CRAP    3
+#define        COMMENT '#'
+#define        QUOTE   '"'
+
+extern int     transfer;
+
+#define        INDENT  3       /* indent delta */
+#ifdef gcos
+#define        CONTFLD 6
+#endif
+#ifdef unix
+#define        CONTFLD 1
+#endif
+extern int     contfld;        /* column for continuation char */
+extern int     contchar;
+extern int     dbg;
+extern int     yyval;
+extern int     *yypv;
+extern int     yylval;
+extern int     errorflag;
+
+extern char    comment[];      /* save input comments here */
+extern int     comptr; /* next free slot in comment */
+extern int     printcom;       /* print comments, etc., if on */
+extern int     indent; /* level of nesting for indenting */
+
+extern char    ibuf[];
+extern char    *ip;
+
+extern FILE    *outfil;        /* output file id */
+extern FILE    *infile[];
+extern char    *curfile[];
+extern int     infptr;
+extern int     linect[];
+
+extern char    fcname[];
+
+extern int     svargc;
+extern char    **svargv;
+
+#define EOS 0
+#define        HSHSIZ  101
+struct nlist {
+       char    *name;
+       char    *def;
+       int     ydef;
+       struct  nlist *next;
+};
+
+struct nlist   *lookup();
+char   *install();
+char   *malloc();
+extern char    *fcnloc;
+
+extern char    type[];