=================================================================== RCS file: /home/cvs/OpenXM_contrib2/asir2000/parse/parse.h,v retrieving revision 1.40 retrieving revision 1.43 diff -u -p -r1.40 -r1.43 --- OpenXM_contrib2/asir2000/parse/parse.h 2005/10/26 07:33:03 1.40 +++ OpenXM_contrib2/asir2000/parse/parse.h 2005/11/06 01:27:28 1.43 @@ -45,7 +45,7 @@ * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. * - * $OpenXM: OpenXM_contrib2/asir2000/parse/parse.h,v 1.39 2005/09/30 01:35:25 noro Exp $ + * $OpenXM: OpenXM_contrib2/asir2000/parse/parse.h,v 1.42 2005/11/04 07:03:38 noro Exp $ */ # if defined(VISUAL) #include @@ -69,7 +69,7 @@ typedef enum { I_FORMULA, I_LIST, I_STR, I_NEWCOMP, I_CAR, I_CDR, I_CAST, I_INDEX, I_EV, I_TIMER, I_GF2NGEN, I_GFPNGEN, I_GFSNGEN, I_LOP, I_OPT, I_GETOPT, I_POINT, I_PAREN, I_MINUS, - I_NARYOP, I_CONS + I_NARYOP, I_CONS, I_FUNC_HEAD, I_ARF_OP } fid; /* identifiers for statements */ @@ -136,7 +136,7 @@ struct oTKWD { }; typedef struct fid_spec { - fid id; + fid id; farg_type type[10]; } *fid_spec_p; @@ -194,7 +194,10 @@ typedef struct oPFINS { #define NEWPF(p) ((p)=(PF)MALLOC(sizeof(struct oPF))) typedef struct oFNODE { - fid id; + short id; + unsigned normalized:1; + unsigned expanded:1; + unsigned coef:1; pointer arg[1]; } *FNODE;