OpenXM_contrib2/asir2000/parse/parse.h - diff

Return to parse.h CVS log

Up to [local] / OpenXM_contrib2 / asir2000 / parse

version 1.8, 2001/04/20 02:34:24

version 1.13, 2001/09/03 08:52:39

Line 45

* 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.7 2000/12/08 06:43:11 noro Exp $

* $OpenXM: OpenXM_contrib2/asir2000/parse/parse.h,v 1.12 2001/09/03 07:01:10 noro Exp $

# if defined(VISUAL)

#include <time.h>

Line 64

typedef enum {

I_BOP, I_COP, I_AND, I_OR, I_NOT, I_CE,

I_PRESELF, I_POSTSELF,

I_FUNC, I_FUNC_OPT, I_IFUNC, I_MAP, I_PFDERIV,

I_FUNC, I_FUNC_OPT, I_IFUNC, I_MAP, I_RECMAP, I_PFDERIV,

I_ANS, I_PVAR, I_ASSPVAR,

I_FORMULA, I_LIST, I_STR, I_NEWCOMP, I_CAR, I_CDR, I_CAST,

I_COM, I_PROC, I_INDEX, I_EV, I_TIMER, I_GF2NGEN, I_GFPNGEN, I_LOP,

I_COM, I_PROC, I_INDEX, I_EV, I_TIMER, I_GF2NGEN, I_GFPNGEN, I_GFSNGEN,

I_OPT, I_GETOPT, I_POINT, I_QUOTE

I_LOP, I_OPT, I_GETOPT, I_POINT, I_QUOTE, I_PAREN

} fid;

/* identifiers for statements */

Line 287 switch ( id ) {\

#define GETPV(i,p) \

((int)(i)>=0 ? (int)((p)=CPVS->va[(unsigned int)(i)].priv)\

: (int)((p)=GPVS->va[(unsigned int)(i)&(~MSB)].priv))

#define GETPVNAME(i,p) \

((int)(i)>=0 ? (int)((p)=CPVS->va[(unsigned int)(i)].name)\

: (int)((p)=GPVS->va[(unsigned int)(i)&(~MSB)].name))

#define ASSPV(i,p) \

((int)(i)>=0 ? (int)(CPVS->va[(unsigned int)(i)].priv=(pointer)(p))\

: (int)(GPVS->va[(unsigned int)(i)&(~MSB)].priv=(pointer)(p)))

Line 319 extern int Verbose;

Line 322 extern int Verbose;

#define fflush w_fflush

#endif

#if defined(VISUAL)

#if defined(VISUAL) || (defined(__MACH__) && defined(__ppc__))

NODE mknode(int,...);

FNODE mkfnode(int,fid,...);

SNODE mksnode(int,sid,...);