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