=================================================================== RCS file: /home/cvs/OpenXM/src/ox_math/Attic/parse.h,v retrieving revision 1.1.1.1 retrieving revision 1.4 diff -u -p -r1.1.1.1 -r1.4 --- OpenXM/src/ox_math/Attic/parse.h 1999/10/29 08:06:42 1.1.1.1 +++ OpenXM/src/ox_math/Attic/parse.h 1999/11/06 21:39:37 1.4 @@ -1,6 +1,5 @@ /* -*- mode: C; coding: euc-japan -*- */ -/* $OpenXM$ */ -/* $Id: parse.h,v 1.1.1.1 1999/10/29 08:06:42 ohara Exp $ */ +/* $OpenXM: OpenXM/src/ox_math/parse.h,v 1.3 1999/11/02 19:51:18 ohara Exp $ */ #ifndef _PARSE_H_ @@ -8,50 +7,40 @@ #define _PARSE_H_ -/* トークンを定義する */ -/* 2048 より小さいのは特別なもの */ +/* トークンの定義 */ +/* 256 より小さいものは、一文字だけのトークンである */ #define T_INTEGER 257 #define T_STRING 258 - #define T_MAGIC 2048 +#define TOKEN(x) (T_MAGIC + (x)) +#define SM SM_popCMO -#define T_CMO_NULL (T_MAGIC + CMO_NULL) -#define T_CMO_INT32 (T_MAGIC + CMO_INT32) -#define T_CMO_STRING (T_MAGIC + CMO_STRING) -#define T_CMO_LIST (T_MAGIC + CMO_LIST) -#define T_CMO_ZZ (T_MAGIC + CMO_ZZ) -#define T_CMO_ZERO (T_MAGIC + CMO_ZERO) -#define T_CMO_DATUM (T_MAGIC + CMO_DATUM) -#define T_CMO_ERROR2 (T_MAGIC + CMO_ERROR2) +/* トークンの種類を判定するためのマクロ */ +#define MIN_T_CMO TOKEN(0) +#define MAX_T_CMO TOKEN(256) +#define MIN_T_OX TOKEN(512) +#define MAX_T_OX TOKEN(600) -#define T_SM_popCMO (T_MAGIC + SM_popCMO) -#define T_SM_popString (T_MAGIC + SM_popString) -#define T_SM_mathcap (T_MAGIC + SM_mathcap) -#define T_SM_pops (T_MAGIC + SM_pops) -#define T_SM_executeStringByLocalParser (T_MAGIC + SM_executeStringByLocalParser) -#define T_SM_executeFunction (T_MAGIC + SM_executeFunction) -#define T_SM_setMathcap (T_MAGIC + SM_setMathcap) -#define T_SM_control_kill (T_MAGIC + SM_control_kill) -#define T_SM_control_reset_connection (T_MAGIC + SM_control_reset_connection) +#define IS_CMO 1 +#define IS_SM 2 +#define IS_OX 3 -#define T_OX_COMMAND (T_MAGIC + OX_COMMAND) -#define T_OX_DATA (T_MAGIC + OX_DATA) +#define PFLAG_ADDREV 1 +int setflag_parse(int flag); -/* lexical analyzer で用いる属性値の共用体の定義 */ -typedef union{ - int d; - char* sym; -} lex_value_t; - -int lex(); cmo *parse(); -int cmo_addrev; /* CMO の省略記法を許すか否かのフラグ */ - int setgetc(int (*foo)()); int resetgetc(); int mygetc(); int setmode_mygetc(char *s, int len); + +typedef struct { + char *key; + int tag; + int token; + int type; +} symbol; #endif /* _PARSE_H_ */