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