diff -ruN klic-3.003-2002-02-24a/include/klic/g_methtab.h klic-3.003-2002-02-24b/include/klic/g_methtab.h
--- klic-3.003-2002-02-24a/include/klic/g_methtab.h	Mon Feb 18 16:21:18 2002
+++ klic-3.003-2002-02-24b/include/klic/g_methtab.h	Sun Feb 24 14:52:25 2002
@@ -31,9 +31,7 @@
 		    unsigned long depth,
 		    unsigned long length */ );
   q *(*gc)( /* struct data_object *obj, q *allocp , q **sp */ );
-  long (*regist)( /* struct data_object *obj */ );
   void (*deallocate)( /* struct data_object* obj */ );
-  q *(*close)( /* struct data_object *obj, */ );
   q *(*body_generic)( /* struct data_object *obj,
 				      q method_functor,
 				      q *argv,
@@ -69,9 +67,7 @@
 		  unsigned long max_depth,
 		  unsigned long max_length */);
   q *(*gc)(/* struct consumer_object *obj, q *allocp, q **sp */);
-  long (*regist)(/* struct consumer_object *obj */ );
   void (*deallocate)( /* struct consumer_object* obj */ );
-  q *(*close)( /* struct consumer_object *obj */ );
   q (*encode)(/* struct consumer_object *obj, long node */);
 };
 
@@ -97,9 +93,7 @@
   q* (*gc)( /* struct generator_object* self,
 	       q* allocp,
 	       q** sp */);
-  long (*regist)(/* struct generator_object* self */);
   void (*deallocate)(/* struct generator_object* self */);
-  q* (*close)(/* struct generator_object* self */);
   q (*encode)(/* struct generator_object* self, long node */);
 };
 
diff -ruN klic-3.003-2002-02-24a/include/klic/gc_methtab.h klic-3.003-2002-02-24b/include/klic/gc_methtab.h
--- klic-3.003-2002-02-24a/include/klic/gc_methtab.h	Mon Feb 18 16:19:03 2002
+++ klic-3.003-2002-02-24b/include/klic/gc_methtab.h	Sun Feb 24 14:51:10 2002
@@ -13,14 +13,10 @@
 extern q* GC_STD_GC();
 
 /* runtime/generic.c */
-extern long GD_STD_REGIST(struct data_object* GD_SELF, q* g_allocp);
 extern void GD_STD_DEALLOCATE(struct data_object* GD_SELF);
-extern q* GD_STD_CLOSE(struct data_object* GD_SELF, q* g_allocp);
 extern q GD_STD_ENCODE(struct data_object* self, void* buffer);
 
-#define GC_STD_REGIST GD_STD_REGIST
 #define GC_STD_DEALLOCATE GD_STD_DEALLOCATE
-#define GC_STD_CLOSE GD_STD_CLOSE
 #define GC_STD_ENCODE GD_STD_ENCODE
 
 struct consumer_object_method_table GC_method_table
@@ -43,22 +39,10 @@
  GC_rappend(gc) ,
 #endif
 
-#ifndef GCUSE_MY_REGIST
- GC_STD_REGIST ,
-#else
- GC_rappend(regist) ,
-#endif
-
 #ifndef GCUSE_MY_DEALLOCATE
  GC_STD_DEALLOCATE ,
 #else
  GC_rappend(deallocate) ,
-#endif
-
-#ifndef GCUSE_MY_CLOSE
- GC_STD_CLOSE ,
-#else
- GC_rappend(close) , 
 #endif
 
 #ifndef GCUSE_MY_ENCODE
diff -ruN klic-3.003-2002-02-24a/include/klic/gd_methtab.h klic-3.003-2002-02-24b/include/klic/gd_methtab.h
--- klic-3.003-2002-02-24a/include/klic/gd_methtab.h	Mon Feb 18 16:19:44 2002
+++ klic-3.003-2002-02-24b/include/klic/gd_methtab.h	Sun Feb 24 14:51:59 2002
@@ -22,9 +22,7 @@
   unsigned long g_depth, unsigned long g_length );
 
 extern q* GD_STD_GC(struct data_object* GD_SELF, q* g_allocp, q** g_sp);
-extern long GD_STD_REGIST(struct data_object* GD_SELF, q* g_allocp);
 extern void GD_STD_DEALLOCATE(struct data_object* GD_SELF);
-extern q* GD_STD_CLOSE(struct data_object* GD_SELF, q* g_allocp);
 
 extern q* GD_STD_GENERIC(
   struct data_object* GD_SELF, long g_method_functor, q GD_ARGV[], q* g_allocp );
@@ -65,22 +63,10 @@
  GD_rappend(gc) ,
 #endif
 
-#ifndef GDUSE_MY_REGIST
- GD_STD_REGIST ,
-#else
- GD_rappend(regist) ,
-#endif
-
 #ifndef GDUSE_MY_DEALLOCATE
  GD_STD_DEALLOCATE ,
 #else
  GD_rappend(deallocate) ,
-#endif
-
-#ifndef GDUSE_MY_CLOSE
- GD_STD_CLOSE ,
-#else
- GD_rappend(close) ,
 #endif
 
 #ifndef GDUSE_MY_GENERIC
diff -ruN klic-3.003-2002-02-24a/include/klic/gg_methtab.h klic-3.003-2002-02-24b/include/klic/gg_methtab.h
--- klic-3.003-2002-02-24a/include/klic/gg_methtab.h	Mon Feb 18 16:20:31 2002
+++ klic-3.003-2002-02-24b/include/klic/gg_methtab.h	Sun Feb 24 14:51:46 2002
@@ -14,14 +14,10 @@
 extern q* GG_STD_GC();
 
 /* runtime/generic.c */
-extern long GD_STD_REGIST(struct data_object* GD_SELF, q* g_allocp);
 extern void GD_STD_DEALLOCATE(struct data_object* GD_SELF);
-extern q* GD_STD_CLOSE(struct data_object* GD_SELF, q* g_allocp);
 extern q GD_STD_ENCODE(struct data_object* self, void* buffer);
 
-#define GG_STD_REGIST GD_STD_REGIST
 #define GG_STD_DEALLOCATE GD_STD_DEALLOCATE
-#define GG_STD_CLOSE GD_STD_CLOSE
 #define GG_STD_ENCODE GD_STD_ENCODE
 
 struct generator_object_method_table GG_method_table
@@ -57,22 +53,10 @@
  GG_rappend(gc) ,
 #endif
 
-#ifndef GGUSE_MY_REGIST
- GG_STD_REGIST ,
-#else
- GG_rappend(regist) ,
-#endif
-
 #ifndef GGUSE_MY_DEALLOCATE
  GG_STD_DEALLOCATE ,
 #else
  GG_rappend(deallocate) ,
-#endif
-
-#ifndef GGUSE_MY_CLOSE
- GG_STD_CLOSE ,
-#else
- GG_rappend(close) ,
 #endif
 
 #ifndef GGUSE_MY_ENCODE
diff -ruN klic-3.003-2002-02-24a/runtime/generic.c klic-3.003-2002-02-24b/runtime/generic.c
--- klic-3.003-2002-02-24a/runtime/generic.c	Sun Feb 24 13:17:25 2002
+++ klic-3.003-2002-02-24b/runtime/generic.c	Sun Feb 24 14:56:42 2002
@@ -191,28 +191,10 @@
   return g_allocp;
 }
 
-extern long
-GD_STD_REGIST(GD_SELF, g_allocp)
+extern void
+GD_STD_DEALLOCATE(GD_SELF)
   struct data_object* GD_SELF;
-  q* g_allocp;
 {
-  return 1L;
-}
-
-extern q*
-GD_STD_DEALLOCATE(GD_SELF, g_allocp)
-  struct data_object* GD_SELF;
-  q* g_allocp;
-{
-  return g_allocp;
-}
-
-extern q*
-GD_STD_CLOSE(GD_SELF, g_allocp)
-  struct data_object* GD_SELF;
-  q* g_allocp;
-{
-  return g_allocp;
 }