From: CSRG <csrg@ucbvax.Berkeley.EDU>
Date: Thu, 11 Aug 1983 14:02:03 +0000 (-0800)
Subject: BSD 4_3 development
X-Git-Tag: BSD-4_3~1688
X-Git-Url: https://git.subgeniuskitty.com/unix-history/.git/commitdiff_plain/f87698ca59055ded0e2196607ad842e0cecd3305

BSD 4_3 development
Work on file usr/src/usr.bin/ratfor/r.h

Synthesized-from: CSRG/cd1/4.3
---

diff --git a/usr/src/usr.bin/ratfor/r.h b/usr/src/usr.bin/ratfor/r.h
new file mode 100644
index 0000000000..5a466dbed7
--- /dev/null
+++ b/usr/src/usr.bin/ratfor/r.h
@@ -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[];