version 1.3, 2000/12/10 02:21:45 |
version 1.5, 2005/06/16 05:07:24 |
|
|
/* $OpenXM: OpenXM/src/k097/d.h,v 1.2 2000/01/21 03:01:25 takayama Exp $ */ |
/* $OpenXM: OpenXM/src/k097/d.h,v 1.4 2005/06/09 04:47:16 takayama Exp $ */ |
/* d.h;*/ |
/* d.h;*/ |
/* from stackm.h */ |
/* from stackm.h */ |
|
|
|
|
int tag; /* class identifier */ |
int tag; /* class identifier */ |
union cell lc; /* left cell */ |
union cell lc; /* left cell */ |
union cell rc; /* right cell */ |
union cell rc; /* right cell */ |
|
struct object *attr; |
}; |
}; |
|
|
struct object{ /* must be compatible with stackm.h */ |
struct object{ /* must be compatible with stackm.h */ |
int tag; /* class identifier */ |
int tag; /* class identifier */ |
union cell lc; /* left cell */ |
union cell lc; /* left cell */ |
union cell rc; /* right cell */ |
union cell rc; /* right cell */ |
|
struct object *attr; |
}; |
}; |
|
|
|
#define OINIT { .attr = NULL } |
|
|
typedef struct Object * objectp; /* cf. 65p of Schreiner. */ |
typedef struct Object * objectp; /* cf. 65p of Schreiner. */ |
#define YYSTYPE objectp |
#define YYSTYPE objectp |