1984-10-08 14:14:53 +00:00
|
|
|
/*
|
|
|
|
* (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
|
|
|
|
*
|
|
|
|
* This product is part of the Amsterdam Compiler Kit.
|
|
|
|
*
|
|
|
|
* Permission to use, sell, duplicate or disclose this software must be
|
|
|
|
* obtained in writing. Requests for such permissions may be sent to
|
|
|
|
*
|
|
|
|
* Dr. Andrew S. Tanenbaum
|
|
|
|
* Wiskundig Seminarium
|
|
|
|
* Vrije Universiteit
|
|
|
|
* Postbox 7161
|
|
|
|
* 1007 MC Amsterdam
|
|
|
|
* The Netherlands
|
|
|
|
*
|
|
|
|
*/
|
|
|
|
|
|
|
|
/*
|
|
|
|
* L L G E N
|
|
|
|
*
|
|
|
|
* An Extended LL(1) Parser Generator
|
|
|
|
*
|
|
|
|
* Author : Ceriel J.H. Jacobs
|
|
|
|
*/
|
|
|
|
|
|
|
|
/*
|
|
|
|
* extern.h $Header$
|
|
|
|
* Miscellanious constants and
|
|
|
|
* some variables that are visible in more than one file
|
|
|
|
*/
|
|
|
|
|
1985-11-25 15:47:51 +00:00
|
|
|
# define LTEXTSZ 51 /* Size of longest token */
|
|
|
|
|
1984-10-08 14:14:53 +00:00
|
|
|
/*
|
|
|
|
* options for the identifier search routine
|
|
|
|
*/
|
1985-11-25 15:47:51 +00:00
|
|
|
|
1984-10-08 14:14:53 +00:00
|
|
|
# define ENTERING 1
|
|
|
|
# define BOTH 2
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Now for some declarations
|
|
|
|
*/
|
|
|
|
|
|
|
|
extern char ltext[]; /* input buffer */
|
|
|
|
extern int nnonterms; /* number of nonterminals */
|
1985-11-25 15:47:51 +00:00
|
|
|
extern int ntokens; /* number of terminals */
|
1984-10-08 14:14:53 +00:00
|
|
|
extern p_start start; /* will contain startsymbols */
|
|
|
|
extern int linecount; /* line number */
|
|
|
|
extern int assval; /* to create difference between literals
|
|
|
|
* and other terminals
|
|
|
|
*/
|
1985-11-25 15:47:51 +00:00
|
|
|
extern p_nont nonterms; /* the nonterminal array */
|
1984-10-08 14:14:53 +00:00
|
|
|
extern p_nont maxnt; /* is filled up until here */
|
1985-11-25 15:47:51 +00:00
|
|
|
extern p_token tokens; /* the token array */
|
|
|
|
extern p_token maxt; /* is filled up until here */
|
|
|
|
extern struct order *sorder, *porder;
|
|
|
|
/* order of nonterminals in the grammar,
|
1984-10-08 14:14:53 +00:00
|
|
|
* important because actions are copied to
|
|
|
|
* a temporary file in the order in which they
|
|
|
|
* were read
|
|
|
|
*/
|
|
|
|
extern string e_noopen; /* Error message string used often */
|
|
|
|
extern int verbose; /* Level of verbosity */
|
|
|
|
extern string lexical; /* name of lexical analyser */
|
1987-02-16 21:38:52 +00:00
|
|
|
extern string onerror; /* name of user error handler */
|
1984-10-08 14:14:53 +00:00
|
|
|
extern int ntneeded; /* ntneeded = 1 if nonterminals are included
|
|
|
|
* in the sets.
|
|
|
|
*/
|
|
|
|
extern int ntprint; /* ntprint = 1 if they must be printed too in
|
|
|
|
* the LL.output file (-x option)
|
|
|
|
*/
|
|
|
|
# ifndef NDEBUG
|
|
|
|
extern int debug;
|
|
|
|
# endif not NDEBUG
|
|
|
|
extern p_file files,pfile; /* pointers to file structure.
|
|
|
|
* "files" points to the start of the
|
|
|
|
* list */
|
1985-11-25 15:47:51 +00:00
|
|
|
extern p_file maxfiles;
|
1984-10-08 14:14:53 +00:00
|
|
|
extern string LLgenid; /* LLgen identification string */
|
|
|
|
extern t_token lextoken; /* the current token */
|
|
|
|
extern int nerrors;
|
1985-11-25 15:47:51 +00:00
|
|
|
extern string rec_file, incl_file;
|
|
|
|
extern p_term terms;
|
|
|
|
extern p_link links;
|