guile-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Guile-commits] 22/42: Remove unused `default-slot-definition-class' <cl


From: Andy Wingo
Subject: [Guile-commits] 22/42: Remove unused `default-slot-definition-class' <class> slot
Date: Sat, 10 Jan 2015 00:03:11 +0000

wingo pushed a commit to branch wip-goops-refactor
in repository guile.

commit fab2ed87ab627cdb6b3981439d88ce4b7d36e5d8
Author: Andy Wingo <address@hidden>
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 7506e7c..2d6c87e 100644
--- a/module/oop/goops.scm
+++ b/module/oop/goops.scm
@@ -238,7 +238,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))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]