=================================================================== RCS file: /home/cvs/OpenXM/src/k097/d.h,v retrieving revision 1.4 retrieving revision 1.7 diff -u -p -r1.4 -r1.7 --- OpenXM/src/k097/d.h 2005/06/09 04:47:16 1.4 +++ OpenXM/src/k097/d.h 2015/10/10 11:29:46 1.7 @@ -1,6 +1,8 @@ -/* $OpenXM: OpenXM/src/k097/d.h,v 1.3 2000/12/10 02:21:45 takayama Exp $ */ +/* $OpenXM: OpenXM/src/k097/d.h,v 1.6 2013/11/07 07:29:47 takayama Exp $ */ /* d.h;*/ /* from stackm.h */ +#include +#include /**** data types (class identifiers) ************/ #define Snull 0 @@ -57,6 +59,8 @@ struct object{ /* must be compatible with stac struct object *attr; }; +#define OINIT { .attr = NULL } + typedef struct Object * objectp; /* cf. 65p of Schreiner. */ #define YYSTYPE objectp @@ -167,6 +171,9 @@ int K00getIncetanceVariable(char *s); void K00recoverFromError(); int K00declareClass(char *name,char *supername); void K00toPrimitiveClass(); + +void *GC_malloc(size_t size); +void *sGC_malloc(size_t size);