===================================================================
RCS file: /home/cvs/OpenXM/src/k097/d.h,v
retrieving revision 1.1.1.1
retrieving revision 1.7
diff -u -p -r1.1.1.1 -r1.7
--- OpenXM/src/k097/d.h	1999/10/08 02:12:14	1.1.1.1
+++ 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.6 2013/11/07 07:29:47 takayama Exp $ */
 /* d.h;*/
 /*  from stackm.h */
+#include <string.h>
+#include <stdlib.h>
 
 /**** data types (class identifiers) ************/
 #define Snull             0
@@ -47,14 +49,18 @@ struct Object{
   int tag;                /* class identifier */
   union cell lc;          /* left cell */
   union cell rc;          /* right cell */
+  struct object *attr;
 };
 
 struct object{         /* must be compatible with stackm.h */
   int tag;                /* class identifier */
   union cell lc;          /* left cell */
   union cell rc;          /* right cell */
+  struct object *attr;
 };
 
+#define OINIT { .attr = NULL }
+
 typedef struct Object * objectp;   /* cf. 65p of Schreiner. */
 #define YYSTYPE objectp
 
@@ -131,6 +137,7 @@ int fsungetc(int c,objectp op);
 void readLineFromFile(FILE *fp,struct stringBuf *obuf);
 struct stringBuf *newStringBuf(char *initstr);
 void doublingStringBuf(struct stringBuf *sbuf);
+objectp checkIfTheFileExists(objectp name);
 void loadFile(objectp op);
 void loadFileWithCpp(objectp op);
 void showStringBuff(objectp op);
@@ -164,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);