/* aplext.h APL2 V1.0.0 - Copyright 1992 by Thomas Glen Smith  *********
* Certain variables are needed globally in the APL environment.  This  *
* text can be included at the top of your main program to declare      *
* them.  See also "aplinit.h".  This text should be included after     *
* "aplcb.h".                                                           *
***********************************************************************/
#if !defined(APLEXT_INCL)
#define APLEXT_INCL
#include APL_DOS_H
#if APL_DOS
size_t aplstack; /* Used to check stack, in DOS only. */
#endif 
int       aplerr;
char      *aplfile;
double    fuzz;
int       indxorg;
double    pp;
struct treelist *treehdr;
void            *aplfphd;       /* Input file stack. */
char      quadav[4];
char      quadct[4];
char      quadfc[6];
char      quadio[4];
char      quadlx[4];
char      quadpp[4];
char      quadrl[4];
char      quadts[4];
char      quadtt[4];
char      quadtz[4];
int       aplcurs;       /* Current location in output line. */
#include "aplchar.h"
#include "aplchax.h"
/* Following are all related to delayed workspace commands. */
struct aplcb *aplwkcb;   /* Workspace command text. */
char      *aplwkcp;      /* Pointer into workspace command text. */
char      *aplwken;      /* Pointer to end workspace command text. */
int       aplwkcd;       /* Workspace command code, OFF, LOAD, etc. */
/* Following is a flag set to 1 if special font is used for display (-f). */
int       aplfont;
/* Following gives maximum digits left of decimal point that you can */
/* request from the format function (F). */
int		apldigs;
/* Following is a flag set to 1 if the interpreter is to start quietly, */
/* (-q) without giving the copywrite notice and version information. */
int 	aplquiet;
/* CAPLIB2 version and copywrite notices. */
#include "aplvrsn.h"
#endif