mirror of
https://github.com/CloverHackyColor/CloverBootloader.git
synced 2024-12-29 17:17:42 +01:00
7c0aa811ec
Signed-off-by: Sergey Isakov <isakov-sl@bk.ru>
144 lines
4.7 KiB
C++
144 lines
4.7 KiB
C++
/* Abstract syntax tree
|
|
*
|
|
* SOFTWARE RIGHTS
|
|
*
|
|
* We reserve no LEGAL rights to the Purdue Compiler Construction Tool
|
|
* Set (PCCTS) -- PCCTS is in the public domain. An individual or
|
|
* company may do whatever they wish with source code distributed with
|
|
* PCCTS or the code generated by PCCTS, including the incorporation of
|
|
* PCCTS, or its output, into commerical software.
|
|
*
|
|
* We encourage users to develop software with PCCTS. However, we do ask
|
|
* that credit is given to us for developing PCCTS. By "credit",
|
|
* we mean that if you incorporate our source code into one of your
|
|
* programs (commercial product, research project, or otherwise) that you
|
|
* acknowledge this fact somewhere in the documentation, research report,
|
|
* etc... If you like PCCTS and have developed a nice tool with the
|
|
* output, please mention that you developed it using PCCTS. In
|
|
* addition, we ask that this header remain intact in our source code.
|
|
* As long as these guidelines are kept, we expect to continue enhancing
|
|
* this system and expect to make other tools available as they are
|
|
* completed.
|
|
*
|
|
* ANTLR 1.33
|
|
* Terence Parr
|
|
* Parr Research Corporation
|
|
* with Purdue University and AHPCRC, University of Minnesota
|
|
* 1989-2000
|
|
*/
|
|
|
|
#ifndef PCCTSAST_H
|
|
#define PCCTSAST_H
|
|
|
|
#include "pcctscfg.h"
|
|
|
|
#include "pccts_stdio.h"
|
|
#include "pccts_stdlib.h"
|
|
|
|
PCCTS_NAMESPACE_STD
|
|
|
|
//class SList;
|
|
|
|
#define StringScanMaxText 50
|
|
#define MaxTreeStackDepth 400
|
|
|
|
//
|
|
// 7-Apr-97 133MR1 signed int not accepted by AT&T cfront
|
|
//
|
|
typedef struct stringlexer {
|
|
int c; // MR1
|
|
char *input;
|
|
char *p;
|
|
char text[StringScanMaxText];
|
|
} StringLexer;
|
|
|
|
/* Define the structures needed for ast_scan() */
|
|
typedef struct stringparser {
|
|
int token;
|
|
StringLexer *lexer;
|
|
int num_labels;
|
|
} StringParser;
|
|
|
|
typedef struct _scanast {
|
|
struct _scanast *_right, *_down;
|
|
int _token;
|
|
int label_num;
|
|
int type() { return _token; }
|
|
struct _scanast *right() { return _right; }
|
|
struct _scanast *down() { return _down; }
|
|
} ScanAST;
|
|
|
|
#define VALID_SCAN_TOKEN(t) (t>=__LPAREN && t<=__PERIOD)
|
|
|
|
class DllExportPCCTS PCCTS_AST {
|
|
protected:
|
|
static const char *scan_token_tbl[]; /* MR20 const */
|
|
enum {
|
|
__LPAREN=1,
|
|
__RPAREN=2,
|
|
__PERCENT=3,
|
|
__INT=4,
|
|
__COLON=5,
|
|
__POUND=6,
|
|
__PERIOD=7,
|
|
__StringScanEOF=-1};
|
|
|
|
protected:
|
|
const char *scan_token_str(int t); /* MR20 const */
|
|
void stringlexer_init(StringLexer *scanner, char *input);
|
|
void stringparser_init(StringParser *, StringLexer *);
|
|
ScanAST *stringparser_parse_scanast(char *templ, int *n);
|
|
ScanAST *stringparser_parse_tree(StringParser *parser);
|
|
ScanAST *stringparser_parse_element(StringParser *parser);
|
|
void stringscan_advance(StringLexer *scanner);
|
|
int stringscan_gettok(StringLexer *scanner);
|
|
void _push(PCCTS_AST **st, int *sp, PCCTS_AST *e);
|
|
PCCTS_AST *_pop(PCCTS_AST **st, int *sp);
|
|
int match_partial(PCCTS_AST *t, PCCTS_AST *u);
|
|
int scanmatch(ScanAST *t, PCCTS_AST **labels[], int *n);
|
|
void scanast_free(ScanAST *t);
|
|
ScanAST *new_scanast(int tok);
|
|
void stringparser_match(StringParser *parser, int type);
|
|
virtual PCCTS_AST *deepCopyBushy();
|
|
|
|
public:
|
|
PCCTS_AST() {;}
|
|
virtual ~PCCTS_AST() {;}
|
|
|
|
/* This group must be defined for SORCERER to work correctly */
|
|
virtual PCCTS_AST *right() = 0;
|
|
virtual PCCTS_AST *down() = 0;
|
|
virtual void setRight(PCCTS_AST *t) = 0;
|
|
virtual void setDown(PCCTS_AST *t) = 0;
|
|
// we define these so ANTLR doesn't have to
|
|
virtual int type() { return 0; }
|
|
virtual void setType(int /*t MR23 */) {;}
|
|
virtual PCCTS_AST *shallowCopy() {panic("no shallowCopy() defined"); return NULL;}
|
|
|
|
/* These are not needed by ANTLR, but are support functions */
|
|
virtual PCCTS_AST *deepCopy(); // used by SORCERER in transform mode
|
|
virtual void addChild(PCCTS_AST *t);
|
|
virtual void lisp_action(FILE * /*f MR23 */) {;}
|
|
virtual void lisp(FILE *f);
|
|
static PCCTS_AST *make(PCCTS_AST *rt, ...);
|
|
virtual PCCTS_AST *ast_find_all(PCCTS_AST *u, PCCTS_AST **cursor);
|
|
virtual int match(PCCTS_AST *u);
|
|
virtual void insert_after(PCCTS_AST *b);
|
|
virtual void append(PCCTS_AST *b);
|
|
virtual PCCTS_AST *tail();
|
|
virtual PCCTS_AST *bottom();
|
|
static PCCTS_AST *cut_between(PCCTS_AST *a, PCCTS_AST *b);
|
|
// virtual SList *to_slist();
|
|
virtual void tfree();
|
|
int ast_scan(char *templ, ...);
|
|
virtual int nsiblings();
|
|
virtual PCCTS_AST *sibling_index(int i);
|
|
|
|
void require(int e,const char *err){ if ( !e ) panic(err); } /* MR20 const */
|
|
virtual void panic(const char *err) // MR20 const
|
|
{ /* MR23 */ printMessage(stderr, "PCCTS_AST: %s\n", err); exit(PCCTS_EXIT_FAILURE); }
|
|
virtual int printMessage(FILE* pFile, const char* pFormat, ...); // MR23
|
|
};
|
|
|
|
#endif /* PCCTSAST_H */
|