===================================================================
RCS file: /home/cvs/OpenXM/src/k097/d.h,v
retrieving revision 1.2
retrieving revision 1.6
diff -u -p -r1.2 -r1.6
--- OpenXM/src/k097/d.h	2000/01/21 03:01:25	1.2
+++ OpenXM/src/k097/d.h	2013/11/07 07:29:47	1.6
@@ -1,4 +1,4 @@
-/* $OpenXM$ */
+/* $OpenXM: OpenXM/src/k097/d.h,v 1.5 2005/06/16 05:07:24 takayama Exp $ */
 /* d.h;*/
 /*  from stackm.h */
 
@@ -47,14 +47,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 +135,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 +169,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);