1*48252Sbostic /*- 2*48252Sbostic * Copyright (c) 1991 The Regents of the University of California. 3*48252Sbostic * All rights reserved. 4*48252Sbostic * 5*48252Sbostic * %sccs.include.proprietary.c% 6*48252Sbostic */ 7*48252Sbostic 814486Ssam #ifndef lint 9*48252Sbostic static char sccsid[] = "@(#)glob.c 4.3 (Berkeley) 04/17/91"; 10*48252Sbostic #endif /* not lint */ 1111005Sshannon 1211005Sshannon #include "e.h" 1311005Sshannon 1411005Sshannon int dbg; /* debugging print if non-zero */ 1511005Sshannon int lp[80]; /* stack for things like piles and matrices */ 1611005Sshannon int ct; /* pointer to lp */ 1711005Sshannon int used[100]; /* available registers */ 1811005Sshannon int ps; /* default init point size */ 1911005Sshannon int deltaps = 3; /* default change in ps */ 2011005Sshannon int gsize = 10; /* default initial point size */ 2111005Sshannon int gfont = ITAL; /* italic */ 2211005Sshannon int ft; /* default font */ 2311005Sshannon FILE *curfile; /* current input file */ 2411005Sshannon int ifile; 2511005Sshannon int linect; /* line number in file */ 2611005Sshannon int eqline; /* line where eqn started */ 2711005Sshannon int svargc; 2811005Sshannon char **svargv; 2911005Sshannon int eht[100]; 3011005Sshannon int ebase[100]; 3111005Sshannon int lfont[100]; 3211005Sshannon int rfont[100]; 3311005Sshannon int eqnreg; /* register where final string appears */ 3411005Sshannon int eqnht; /* inal height of equation */ 3511005Sshannon int lefteq = '\0'; /* left in-line delimiter */ 3611005Sshannon int righteq = '\0'; /* right in-line delimiter */ 3711005Sshannon int lastchar; /* last character read by lex */ 3811005Sshannon int markline = 0; /* 1 if this EQ/EN contains mark or lineup */ 39