[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Guile-commits] 41/42: Remove pure-generic?
From: |
Andy Wingo |
Subject: |
[Guile-commits] 41/42: Remove pure-generic? |
Date: |
Sat, 10 Jan 2015 00:03:18 +0000 |
wingo pushed a commit to branch wip-goops-refactor
in repository guile.
commit 415be11044320d79288af659cc1fc9e189e349b2
Author: Andy Wingo <address@hidden>
Date: Sat Jan 10 00:52:26 2015 +0100
Remove pure-generic?
* libguile/goops.h:
* libguile/goops.c (scm_pure_generic_p): Remove function only compiled
in debug mode.
---
libguile/goops.c | 16 ----------------
libguile/goops.h | 4 ----
2 files changed, 0 insertions(+), 20 deletions(-)
diff --git a/libguile/goops.c b/libguile/goops.c
index 167ddf5..5a2a387 100644
--- a/libguile/goops.c
+++ b/libguile/goops.c
@@ -1314,22 +1314,6 @@ scm_ensure_accessor (SCM name)
return gf;
}
-#ifdef GUILE_DEBUG
-/*
- * Debugging utilities
- */
-
-SCM_DEFINE (scm_pure_generic_p, "pure-generic?", 1, 0, 0,
- (SCM obj),
- "Return @code{#t} if @var{obj} is a pure generic.")
-#define FUNC_NAME s_scm_pure_generic_p
-{
- return scm_from_bool (SCM_PUREGENERICP (obj));
-}
-#undef FUNC_NAME
-
-#endif /* GUILE_DEBUG */
-
/*
* Initialization
*/
diff --git a/libguile/goops.h b/libguile/goops.h
index 077efc6..c5ed39f 100644
--- a/libguile/goops.h
+++ b/libguile/goops.h
@@ -138,10 +138,6 @@ SCM_API SCM scm_sys_allocate_instance (SCM c, SCM
initargs);
SCM_API SCM scm_slot_ref (SCM obj, SCM slot_name);
SCM_API SCM scm_slot_set_x (SCM obj, SCM slot_name, SCM value);
-#ifdef GUILE_DEBUG
-SCM_API SCM scm_pure_generic_p (SCM obj);
-#endif
-
SCM_INTERNAL void scm_i_inherit_applicable (SCM c);
SCM_INTERNAL SCM scm_i_get_keyword (SCM key, SCM l, long len,
SCM default_value, const char *subr);
- [Guile-commits] 26/42: Remove hashset slots from GOOPS classes, (continued)
- [Guile-commits] 26/42: Remove hashset slots from GOOPS classes, Andy Wingo, 2015/01/09
- [Guile-commits] 29/42: Remove private var_no_applicable_method capture, Andy Wingo, 2015/01/09
- [Guile-commits] 22/42: Remove unused `default-slot-definition-class' <class> slot, Andy Wingo, 2015/01/09
- [Guile-commits] 31/42: Remove unused union scm_t_debug_info, Andy Wingo, 2015/01/09
- [Guile-commits] 33/42: Remove GOOPS random state, Andy Wingo, 2015/01/09
- [Guile-commits] 35/42: Statically compute offsets for slots of <class> in Scheme, Andy Wingo, 2015/01/09
- [Guile-commits] 24/42: Generics with setters have <applicable-struct-with-setter> layout, Andy Wingo, 2015/01/09
- [Guile-commits] 11/42: Move GOOPS boot to Scheme, Andy Wingo, 2015/01/09
- [Guile-commits] 34/42: Refactor to <class> slot computation, Andy Wingo, 2015/01/09
- [Guile-commits] 42/42: Remove TEST_CHANGE_CLASS, Andy Wingo, 2015/01/09
- [Guile-commits] 41/42: Remove pure-generic?,
Andy Wingo <=
- [Guile-commits] 40/42: Goops slot-unbound / slot-missing cleanups, Andy Wingo, 2015/01/09
- [Guile-commits] 38/42: Port method and generic accessors to Scheme, Andy Wingo, 2015/01/09
- [Guile-commits] 39/42: Move slot-ref et al to Scheme, Andy Wingo, 2015/01/09
- [Guile-commits] 37/42: <class> accessors implemented in Scheme, Andy Wingo, 2015/01/09
- [Guile-commits] 32/42: More goops.c cleanups, and fix a security issue, Andy Wingo, 2015/01/09
- [Guile-commits] 25/42: Deprecate C exports of GOOPS classes., Andy Wingo, 2015/01/09
- [Guile-commits] 17/42: Fold GOOPS compile and dispatch modules into main GOOPS module, Andy Wingo, 2015/01/09
- [Guile-commits] 36/42: goops: use computed class slot offsets; untabify and fix whitepace, Andy Wingo, 2015/01/09