summaryrefslogtreecommitdiff
path: root/libguile/goops.h
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2009-01-12 21:36:39 +0100
committerAndy Wingo <wingo@pobox.com>2009-01-12 21:36:39 +0100
commitc32929d14d40f9e00c3fd10d3f51d54733ebf687 (patch)
treec803163a177580b5a8506052a18664a48504ba00 /libguile/goops.h
parentc41350777d6faf05f80627f97ca01cd5c8fac47b (diff)
parentdc686d7b0a1490e26482e018489dec040b79b952 (diff)
downloadguile-c32929d14d40f9e00c3fd10d3f51d54733ebf687.tar.gz
Merge commit 'origin/master' into vm
Conflicts: .gitignore guile-tools.in srfi/srfi-19.scm
Diffstat (limited to 'libguile/goops.h')
-rw-r--r--libguile/goops.h2
1 files changed, 0 insertions, 2 deletions
diff --git a/libguile/goops.h b/libguile/goops.h
index 49ef5355d..2c16de2f6 100644
--- a/libguile/goops.h
+++ b/libguile/goops.h
@@ -98,8 +98,6 @@ typedef struct scm_t_method {
/* Also defined in libguile/objects.c */
#define SCM_CLASS_OF(x) SCM_STRUCT_VTABLE (x)
#define SCM_ACCESSORS_OF(x) (SCM_PACK (SCM_STRUCT_VTABLE_DATA (x)[scm_si_getters_n_setters]))
-#define SCM_NUMBER_OF_SLOTS(x) \
- ((SCM_STRUCT_DATA (x)[scm_struct_i_n_words]) - scm_struct_n_extra_words)
#define SCM_CLASSP(x) \
(SCM_STRUCTP (x) && SCM_STRUCT_VTABLE_FLAGS (x) & SCM_CLASSF_METACLASS)