wingo pushed a commit to branch master
in repository guile.
commit 79f2aaab30edce3697082527f1c615ad26007601
Author: Andy Wingo <[email protected]>
Date: Tue Jan 6 12:03:25 2015 -0500
Remove unused `default-slot-definition-class' <class> slot
* libguile/goops.h (SCM_CLASS_CLASS_LAYOUT, scm_si_slotdef_class)
* module/oop/goops.scm (build-<class>-slots): Remove unused
`default-slot-definition-class' <class> slot.
---
libguile/goops.h | 10 ++++------
module/oop/goops.scm | 1 -
2 files changed, 4 insertions(+), 7 deletions(-)
diff --git a/libguile/goops.h b/libguile/goops.h
index 08e8c62..6ba9698 100644
--- a/libguile/goops.h
+++ b/libguile/goops.h
@@ -76,7 +76,6 @@
"pw" /* direct subclasses */ \
"pw" /* direct methods */ \
"pw" /* cpl */ \
- "pw" /* default-slot-definition-class */ \
"pw" /* slots */ \
"pw" /* getters-n-setters */ \
"pw" /* nfields */
@@ -96,11 +95,10 @@
#define scm_si_direct_subclasses (scm_vtable_offset_user + 11) /* (class ...)
*/
#define scm_si_direct_methods (scm_vtable_offset_user + 12) /* (methods ...)
*/
#define scm_si_cpl (scm_vtable_offset_user + 13) /* (class ...) */
-#define scm_si_slotdef_class (scm_vtable_offset_user + 14)
-#define scm_si_slots (scm_vtable_offset_user + 15) /* ((name .
options) ...) */
-#define scm_si_getters_n_setters (scm_vtable_offset_user + 16)
-#define scm_si_nfields (scm_vtable_offset_user + 17) /* an integer */
-#define SCM_N_CLASS_SLOTS (scm_vtable_offset_user + 18)
+#define scm_si_slots (scm_vtable_offset_user + 14) /* ((name .
options) ...) */
+#define scm_si_getters_n_setters (scm_vtable_offset_user + 15)
+#define scm_si_nfields (scm_vtable_offset_user + 16) /* an integer */
+#define SCM_N_CLASS_SLOTS (scm_vtable_offset_user + 17)
#define SCM_OBJ_CLASS_REDEF(x) (SCM_PACK (SCM_STRUCT_VTABLE_DATA (x)
[scm_si_redefined]))
#define SCM_INST(x) SCM_STRUCT_DATA (x)
diff --git a/module/oop/goops.scm b/module/oop/goops.scm
index bf45201..f4ba91b 100644
--- a/module/oop/goops.scm
+++ b/module/oop/goops.scm
@@ -239,7 +239,6 @@
(unspecialized-slot direct-subclasses)
(unspecialized-slot direct-methods)
(unspecialized-slot cpl)
- (unspecialized-slot default-slot-definition-class)
(unspecialized-slot slots)
(unspecialized-slot getters-n-setters)
(unspecialized-slot nfields))))
