Remove unwanted files
This commit is contained in:
Manoel Trapier
Manoël Trapier
parent
46f101f4dd
commit
5c73826e4c
@ -1,85 +0,0 @@
|
|||||||
#ifndef LANG_CEM_CEMCOM_ANSI_LLLEX_H
|
|
||||||
#define LANG_CEM_CEMCOM_ANSI_LLLEX_H
|
|
||||||
/*
|
|
||||||
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
|
|
||||||
* See the copyright notice in the ACK home directory, in the file "Copyright".
|
|
||||||
*/
|
|
||||||
/* $Id$ */
|
|
||||||
/* D E F I N I T I O N S F O R T H E L E X I C A L A N A L Y Z E R */
|
|
||||||
|
|
||||||
/* A token from the input stream is represented by an integer,
|
|
||||||
called a "symbol", but it may have other information associated
|
|
||||||
to it.
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include "file_info.h"
|
|
||||||
#include "nopp.h"
|
|
||||||
|
|
||||||
/* the structure of a token: */
|
|
||||||
struct token {
|
|
||||||
int tok_symb; /* the token itself */
|
|
||||||
char *tok_file; /* the file it (probably) comes from */
|
|
||||||
unsigned int tok_line; /* the line it (probably) comes from */
|
|
||||||
int tok_fund;
|
|
||||||
union {
|
|
||||||
struct idf *tok_idf; /* for IDENTIFIER & TYPE_IDENTIFIER */
|
|
||||||
struct { /* for STRING */
|
|
||||||
char *tok_bts; /* row of bytes */
|
|
||||||
int tok_len; /* length of row of bytes */
|
|
||||||
} tok_string;
|
|
||||||
arith tok_ival; /* for INTEGER */
|
|
||||||
char *tok_fval; /* for FLOATING */
|
|
||||||
} tok_data;
|
|
||||||
};
|
|
||||||
|
|
||||||
#define tk_symb tok_symb
|
|
||||||
#define tk_file tok_file
|
|
||||||
#define tk_line tok_line
|
|
||||||
#define tk_fund tok_fund
|
|
||||||
#define tk_idf tok_data.tok_idf
|
|
||||||
#define tk_bts tok_data.tok_string.tok_bts
|
|
||||||
#define tk_len tok_data.tok_string.tok_len
|
|
||||||
#define tk_ival tok_data.tok_ival
|
|
||||||
#define tk_fval tok_data.tok_fval
|
|
||||||
|
|
||||||
extern struct token dot, ahead, aside;
|
|
||||||
extern int token_nmb; /* number of the ahead token */
|
|
||||||
extern int tk_nmb_at_last_syn_err; /* token number at last syntax error */
|
|
||||||
|
|
||||||
#ifndef NOPP
|
|
||||||
extern int ReplaceMacros; /* "LLlex.c" */
|
|
||||||
extern int AccDefined; /* "LLlex.c" */
|
|
||||||
extern int Unstacked; /* "LLlex.c" */
|
|
||||||
extern int UnknownIdIsZero; /* "LLlex.c" */
|
|
||||||
#endif /* NOPP */
|
|
||||||
extern int EoiForNewline; /* "LLlex.c" */
|
|
||||||
extern int AccFileSpecifier; /* "LLlex.c" */
|
|
||||||
extern int File_Inserted; /* "LLlex.c" */
|
|
||||||
|
|
||||||
extern int NoUnstack; /* buffer.c */
|
|
||||||
|
|
||||||
extern int err_occurred; /* "error.c" */
|
|
||||||
|
|
||||||
#define DOT dot.tk_symb
|
|
||||||
#define AHEAD ahead.tk_symb
|
|
||||||
#define ASIDE aside.tk_symb
|
|
||||||
|
|
||||||
#define EOF (-1)
|
|
||||||
|
|
||||||
/* lang/cem/cemcom.ansi/LLlex.c */
|
|
||||||
void PushLex(void);
|
|
||||||
void PopLex(void);
|
|
||||||
int LLlex(void);
|
|
||||||
int GetToken(struct token *ptok);
|
|
||||||
void skipcomment(void);
|
|
||||||
arith char_constant(char *nm);
|
|
||||||
char *string_token(char *nm, int stop_char, int *plen);
|
|
||||||
int quoted(int ch);
|
|
||||||
int hex_val(int ch);
|
|
||||||
int GetChar(void);
|
|
||||||
int trigraph(void);
|
|
||||||
void strflt2tok(char fltbuf[], struct token *ptok);
|
|
||||||
void strint2tok(char intbuf[], struct token *ptok);
|
|
||||||
|
|
||||||
#endif /* LANG_CEM_CEMCOM_ANSI_LLLEX_H */
|
|
||||||
|
|
||||||
@ -1,65 +0,0 @@
|
|||||||
/*
|
|
||||||
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
|
|
||||||
* See the copyright notice in the ACK home directory, in the file "Copyright".
|
|
||||||
*/
|
|
||||||
/* $Id$ */
|
|
||||||
/* D E F I N I T I O N S F O R T H E L E X I C A L A N A L Y Z E R */
|
|
||||||
|
|
||||||
/* A token from the input stream is represented by an integer,
|
|
||||||
called a "symbol", but it may have other information associated
|
|
||||||
to it.
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include "file_info.h"
|
|
||||||
#include "nopp.h"
|
|
||||||
|
|
||||||
/* the structure of a token: */
|
|
||||||
struct token {
|
|
||||||
int tok_symb; /* the token itself */
|
|
||||||
char *tok_file; /* the file it (probably) comes from */
|
|
||||||
unsigned int tok_line; /* the line it (probably) comes from */
|
|
||||||
int tok_fund;
|
|
||||||
union {
|
|
||||||
struct idf *tok_idf; /* for IDENTIFIER & TYPE_IDENTIFIER */
|
|
||||||
struct { /* for STRING */
|
|
||||||
char *tok_bts; /* row of bytes */
|
|
||||||
int tok_len; /* length of row of bytes */
|
|
||||||
} tok_string;
|
|
||||||
arith tok_ival; /* for INTEGER */
|
|
||||||
char *tok_fval; /* for FLOATING */
|
|
||||||
} tok_data;
|
|
||||||
};
|
|
||||||
|
|
||||||
#define tk_symb tok_symb
|
|
||||||
#define tk_file tok_file
|
|
||||||
#define tk_line tok_line
|
|
||||||
#define tk_fund tok_fund
|
|
||||||
#define tk_idf tok_data.tok_idf
|
|
||||||
#define tk_bts tok_data.tok_string.tok_bts
|
|
||||||
#define tk_len tok_data.tok_string.tok_len
|
|
||||||
#define tk_ival tok_data.tok_ival
|
|
||||||
#define tk_fval tok_data.tok_fval
|
|
||||||
|
|
||||||
extern struct token dot, ahead, aside;
|
|
||||||
extern int token_nmb; /* number of the ahead token */
|
|
||||||
extern int tk_nmb_at_last_syn_err; /* token number at last syntax error */
|
|
||||||
|
|
||||||
#ifndef NOPP
|
|
||||||
extern int ReplaceMacros; /* "LLlex.c" */
|
|
||||||
extern int AccDefined; /* "LLlex.c" */
|
|
||||||
extern int Unstacked; /* "LLlex.c" */
|
|
||||||
extern int UnknownIdIsZero; /* "LLlex.c" */
|
|
||||||
#endif /* NOPP */
|
|
||||||
extern int EoiForNewline; /* "LLlex.c" */
|
|
||||||
extern int AccFileSpecifier; /* "LLlex.c" */
|
|
||||||
extern int File_Inserted; /* "LLlex.c" */
|
|
||||||
|
|
||||||
extern int NoUnstack; /* buffer.c */
|
|
||||||
|
|
||||||
extern int err_occurred; /* "error.c" */
|
|
||||||
|
|
||||||
#define DOT dot.tk_symb
|
|
||||||
#define AHEAD ahead.tk_symb
|
|
||||||
#define ASIDE aside.tk_symb
|
|
||||||
|
|
||||||
#define EOF (-1)
|
|
||||||
@ -1,64 +0,0 @@
|
|||||||
#ifndef LANG_CEM_CEMCOM_ANSI_ARITH_H
|
|
||||||
#define LANG_CEM_CEMCOM_ANSI_ARITH_H
|
|
||||||
/*
|
|
||||||
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
|
|
||||||
* See the copyright notice in the ACK home directory, in the file "Copyright".
|
|
||||||
*/
|
|
||||||
/* $Id$ */
|
|
||||||
/* COMPILER ARITHMETIC */
|
|
||||||
|
|
||||||
/* Normally the compiler does its internal arithmetics in longs
|
|
||||||
native to the source machine, which is always good for local
|
|
||||||
compilations, and generally OK too for cross compilations
|
|
||||||
downwards and sidewards. For upwards cross compilation and
|
|
||||||
to save storage on small machines, SPECIAL_ARITHMETICS will
|
|
||||||
be handy.
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include "spec_arith.h"
|
|
||||||
|
|
||||||
#ifndef SPECIAL_ARITHMETICS
|
|
||||||
|
|
||||||
#include <em_arith.h> /* obtain definition of "arith" */
|
|
||||||
|
|
||||||
#else /* SPECIAL_ARITHMETICS */
|
|
||||||
|
|
||||||
/* All preprocessor arithmetic should be done in longs.
|
|
||||||
*/
|
|
||||||
#include <stdint.h>
|
|
||||||
|
|
||||||
typedef int32_t arith; /* dummy */
|
|
||||||
|
|
||||||
#endif /* SPECIAL_ARITHMETICS */
|
|
||||||
|
|
||||||
#define arith_size (sizeof(arith))
|
|
||||||
#define arith_sign ((arith) 1 << (arith_size * 8 - 1))
|
|
||||||
#define max_arith (~arith_sign)
|
|
||||||
|
|
||||||
struct expr;
|
|
||||||
struct type;
|
|
||||||
|
|
||||||
/* lang/cem/cemcom.ansi/arith.c */
|
|
||||||
void arithbalance(struct expr **e1p, int oper, struct expr **e2p);
|
|
||||||
void relbalance(struct expr **e1p, int oper, struct expr **e2p);
|
|
||||||
void ch3pointer(struct expr **expp, int oper, struct type *tp);
|
|
||||||
int any2arith(struct expr **expp, int oper);
|
|
||||||
void erroneous2int(struct expr **expp);
|
|
||||||
struct expr *arith2arith(struct type *tp, int oper, struct expr *expr);
|
|
||||||
int int2int(struct expr **expp, struct type *tp);
|
|
||||||
void int2float(struct expr **expp, struct type *tp);
|
|
||||||
void float2int(struct expr **expp, struct type *tp);
|
|
||||||
void float2float(struct expr **expp, struct type *tp);
|
|
||||||
void array2pointer(struct expr *exp);
|
|
||||||
void function2pointer(struct expr *exp);
|
|
||||||
void string2pointer(struct expr *ex);
|
|
||||||
void opnd2integral(struct expr **expp, int oper);
|
|
||||||
void opnd2logical(struct expr **expp, int oper);
|
|
||||||
void opnd2test(struct expr **expp, int oper);
|
|
||||||
void any2opnd(struct expr **expp, int oper);
|
|
||||||
void any2parameter(struct expr **expp);
|
|
||||||
void field2arith(struct expr **expp);
|
|
||||||
void switch_sign_fp(struct expr *expr);
|
|
||||||
|
|
||||||
#endif /* LANG_CEM_CEMCOM_ANSI_ARITH_H */
|
|
||||||
|
|
||||||
@ -1,37 +0,0 @@
|
|||||||
/*
|
|
||||||
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
|
|
||||||
* See the copyright notice in the ACK home directory, in the file "Copyright".
|
|
||||||
*/
|
|
||||||
/* $Id$ */
|
|
||||||
/* COMPILER ARITHMETIC */
|
|
||||||
|
|
||||||
/* Normally the compiler does its internal arithmetics in longs
|
|
||||||
native to the source machine, which is always good for local
|
|
||||||
compilations, and generally OK too for cross compilations
|
|
||||||
downwards and sidewards. For upwards cross compilation and
|
|
||||||
to save storage on small machines, SPECIAL_ARITHMETICS will
|
|
||||||
be handy.
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include "spec_arith.h"
|
|
||||||
|
|
||||||
#ifndef SPECIAL_ARITHMETICS
|
|
||||||
|
|
||||||
#include <em_arith.h> /* obtain definition of "arith" */
|
|
||||||
|
|
||||||
#else /* SPECIAL_ARITHMETICS */
|
|
||||||
|
|
||||||
/* All preprocessor arithmetic should be done in longs.
|
|
||||||
*/
|
|
||||||
#include <stdint.h>
|
|
||||||
|
|
||||||
typedef int32_t arith; /* dummy */
|
|
||||||
|
|
||||||
#endif /* SPECIAL_ARITHMETICS */
|
|
||||||
|
|
||||||
#define arith_size (sizeof(arith))
|
|
||||||
#define arith_sign ((arith) 1 << (arith_size * 8 - 1))
|
|
||||||
#define max_arith (~arith_sign)
|
|
||||||
|
|
||||||
struct expr;
|
|
||||||
struct type;
|
|
||||||
@ -1,33 +0,0 @@
|
|||||||
#ifndef LANG_CEM_CEMCOM_ANSI_DECSPECS_H
|
|
||||||
#define LANG_CEM_CEMCOM_ANSI_DECSPECS_H
|
|
||||||
/*
|
|
||||||
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
|
|
||||||
* See the copyright notice in the ACK home directory, in the file "Copyright".
|
|
||||||
*/
|
|
||||||
/* $Id$ */
|
|
||||||
/* DECLARATION SPECIFIER DEFINITION */
|
|
||||||
|
|
||||||
struct decspecs {
|
|
||||||
struct decspecs *next;
|
|
||||||
struct type *ds_type; /* single type */
|
|
||||||
int ds_notypegiven; /* set if type not given explicitly */
|
|
||||||
int ds_typedef; /* 1 if type was a user typedef */
|
|
||||||
int ds_sc_given; /* 1 if the st. class is explicitly given */
|
|
||||||
int ds_sc; /* storage class, given or implied */
|
|
||||||
int ds_size; /* LONG, SHORT or 0 */
|
|
||||||
int ds_unsigned; /* SIGNED, UNSIGNED or 0 */
|
|
||||||
int ds_typequal; /* type qualifiers - see type.str */
|
|
||||||
};
|
|
||||||
|
|
||||||
extern struct decspecs null_decspecs;
|
|
||||||
|
|
||||||
void do_decspecs(struct decspecs *ds);
|
|
||||||
struct type *qualifier_type(struct type *tp, int typequal);
|
|
||||||
|
|
||||||
|
|
||||||
/* lang/cem/cemcom.ansi/decspecs.c */
|
|
||||||
void do_decspecs(struct decspecs *ds);
|
|
||||||
struct type *qualifier_type(struct type *tp, int typequal);
|
|
||||||
|
|
||||||
#endif /* LANG_CEM_CEMCOM_ANSI_DECSPECS_H */
|
|
||||||
|
|
||||||
@ -1,24 +0,0 @@
|
|||||||
/*
|
|
||||||
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
|
|
||||||
* See the copyright notice in the ACK home directory, in the file "Copyright".
|
|
||||||
*/
|
|
||||||
/* $Id$ */
|
|
||||||
/* DECLARATION SPECIFIER DEFINITION */
|
|
||||||
|
|
||||||
struct decspecs {
|
|
||||||
struct decspecs *next;
|
|
||||||
struct type *ds_type; /* single type */
|
|
||||||
int ds_notypegiven; /* set if type not given explicitly */
|
|
||||||
int ds_typedef; /* 1 if type was a user typedef */
|
|
||||||
int ds_sc_given; /* 1 if the st. class is explicitly given */
|
|
||||||
int ds_sc; /* storage class, given or implied */
|
|
||||||
int ds_size; /* LONG, SHORT or 0 */
|
|
||||||
int ds_unsigned; /* SIGNED, UNSIGNED or 0 */
|
|
||||||
int ds_typequal; /* type qualifiers - see type.str */
|
|
||||||
};
|
|
||||||
|
|
||||||
extern struct decspecs null_decspecs;
|
|
||||||
|
|
||||||
void do_decspecs(struct decspecs *ds);
|
|
||||||
struct type *qualifier_type(struct type *tp, int typequal);
|
|
||||||
|
|
||||||
@ -1,11 +0,0 @@
|
|||||||
/*
|
|
||||||
* The Amsterdam Compiler Kit
|
|
||||||
* See the copyright notice in the ACK home directory, in the file "Copyright".
|
|
||||||
*/
|
|
||||||
#ifndef LANG_CEM_CEMCOM_ANSI_EVAL_G_H
|
|
||||||
#define LANG_CEM_CEMCOM_ANSI_EVAL_G_H
|
|
||||||
|
|
||||||
/* lang/cem/cemcom.ansi/eval.g.c */
|
|
||||||
|
|
||||||
#endif /* LANG_CEM_CEMCOM_ANSI_EVAL_G_H */
|
|
||||||
|
|
||||||
Loading…
x
Reference in New Issue
Block a user