guile-commits
[Top][All Lists]
Advanced

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

[Guile-commits] 23/42: Remove unused CPP defines naming <method> slots


From: Andy Wingo
Subject: [Guile-commits] 23/42: Remove unused CPP defines naming <method> slots
Date: Sat, 10 Jan 2015 00:03:11 +0000

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

commit e571ccf8b45d2d75376ec775383634ef58a0e8c0
Author: Andy Wingo <address@hidden>
Date:   Tue Jan 6 12:06:59 2015 -0500

    Remove unused CPP defines naming <method> slots
    
    * libguile/goops.h (scm_si_generic_function, scm_si_specializers)
      (scm_si_procedure, scm_si_formals, scm_si_body)
      (scm_si_make_procedure): Remove unused CPP defines.
---
 libguile/deprecated.c |    1 +
 libguile/goops.h      |    7 -------
 2 files changed, 1 insertions(+), 7 deletions(-)

diff --git a/libguile/deprecated.c b/libguile/deprecated.c
index 2358b42..e0c32f7 100644
--- a/libguile/deprecated.c
+++ b/libguile/deprecated.c
@@ -103,6 +103,7 @@ scm_init_deprecated_goops (void)
 }
 
 #define BUFFSIZE 32            /* big enough for most uses */
+#define scm_si_specializers     1  /* offset of spec. slot in a <method> */
 #define SPEC_OF(x)  SCM_SLOT (x, scm_si_specializers)
 
 static SCM
diff --git a/libguile/goops.h b/libguile/goops.h
index 6ba9698..bc6524c 100644
--- a/libguile/goops.h
+++ b/libguile/goops.h
@@ -150,13 +150,6 @@
 #define scm_si_effective_methods  4
 #define scm_si_generic_setter     5
 
-#define scm_si_generic_function         0  /* offset of gf    slot in a 
<method> */
-#define scm_si_specializers     1  /* offset of spec. slot in a <method> */
-#define scm_si_procedure        2  /* offset of proc. slot in a <method> */
-#define scm_si_formals          3  /* offset of form. slot in a <method> */
-#define scm_si_body             4  /* offset of body  slot in a <method> */
-#define scm_si_make_procedure   5  /* offset of makep.slot in a <method> */
-
 /* C interface */
 SCM_API SCM scm_class_boolean;
 SCM_API SCM scm_class_char;



reply via email to

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