1 /*	Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T	*/
2 /*	  All Rights Reserved  	*/
3 
4 
5 /*
6  * Copyright (c) 1980 Regents of the University of California.
7  * All rights reserved. The Berkeley software License Agreement
8  * specifies the terms and conditions for redistribution.
9  */
10 
11 /*
12  * Copyright (c) 1983, 1984 1985, 1986, 1987, 1988, Sun Microsystems, Inc.
13  * All Rights Reserved.
14  */
15 
16 /*	from OpenSolaris "glob.c	1.4	05/06/02 SMI"	 SVr4.0 1.1		*/
17 
18 /*
19  * Portions Copyright (c) 2005 Gunnar Ritter, Freiburg i. Br., Germany
20  *
21  * Sccsid @(#)glob.c	1.8 (gritter) 10/19/06
22  */
23 
24 #include "e.h"
25 
26 int	dbg;	/* debugging print if non-zero */
27 int	lp[80];	/* stack for things like piles and matrices */
28 int	ct;	/* pointer to lp */
29 int	used[100];	/* available registers */
30 float	ps;	/* default init point size */
31 /*int	resolution = 72;	 * was: resolution of ditroff */
32 float	deltaps	= 3;	/* default change in ps */
33 float	gsize	= 10;	/* default initial point size */
34 int	gfont	= ITAL;	/* italic */
35 int	ft;	/* default font */
36 FILE	*curfile;	/* current input file */
37 int	ifile;
38 int	linect;	/* line number in file */
39 int	eqline;	/* line where eqn started */
40 int	svargc;
41 char	**svargv;
42 #ifndef	NEQN
43 float	eht[100];
44 float	ebase[100];
45 #else	/* NEQN */
46 int	eht[100];
47 int	ebase[100];
48 #endif	/* NEQN */
49 int	lfont[100];
50 int	rfont[100];
51 int	eqnreg;	/* register where final string appears */
52 int	eqnht;	/* inal height of equation */
53 int	lefteq	= '\0';	/* left in-line delimiter */
54 int	righteq	= '\0';	/* right in-line delimiter */
55 int	lastchar;	/* last character read by lex */
56 int	markline	= 0;	/* 1 if this EQ/EN contains mark or lineup */
57 char	*progname;
58