[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Guile-commits] 42/88: Remove pure-generic?
From: |
Andy Wingo |
Subject: |
[Guile-commits] 42/88: Remove pure-generic? |
Date: |
Fri, 23 Jan 2015 15:25:43 +0000 |
wingo pushed a commit to branch master
in repository guile.
commit 3292354a4d09c3266e45ae7cfcf7c571e2b2a766
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 53b69a9..6e1fceb 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] 38/88: <class> accessors implemented in Scheme, (continued)
- [Guile-commits] 38/88: <class> accessors implemented in Scheme, Andy Wingo, 2015/01/23
- [Guile-commits] 30/88: Remove private var_no_applicable_method capture, Andy Wingo, 2015/01/23
- [Guile-commits] 26/88: Deprecate C exports of GOOPS classes., Andy Wingo, 2015/01/23
- [Guile-commits] 41/88: Goops slot-unbound / slot-missing cleanups, Andy Wingo, 2015/01/23
- [Guile-commits] 40/88: Move slot-ref et al to Scheme, Andy Wingo, 2015/01/23
- [Guile-commits] 44/88: No more concept of "pure generics", Andy Wingo, 2015/01/23
- [Guile-commits] 45/88: Remove scm_c_extend_primitive_generic, Andy Wingo, 2015/01/23
- [Guile-commits] 47/88: Rewrite %initialize-object in Scheme, Andy Wingo, 2015/01/23
- [Guile-commits] 48/88: Deprecate scm_get_keyword, Andy Wingo, 2015/01/23
- [Guile-commits] 43/88: Remove TEST_CHANGE_CLASS, Andy Wingo, 2015/01/23
- [Guile-commits] 42/88: Remove pure-generic?,
Andy Wingo <=
- [Guile-commits] 46/88: Minor goops.c tidying, Andy Wingo, 2015/01/23
- [Guile-commits] 37/88: goops: use computed class slot offsets; untabify and fix whitepace, Andy Wingo, 2015/01/23
- [Guile-commits] 50/88: Re-use the vtable "size" field for GOOPS nfields, Andy Wingo, 2015/01/23
- [Guile-commits] 52/88: Reimplement inherit-applicable! in Scheme, Andy Wingo, 2015/01/23
- [Guile-commits] 54/88: Incorporate %inherit-magic! into %init-layout!, Andy Wingo, 2015/01/23
- [Guile-commits] 49/88: Move <class> initialization to Scheme, Andy Wingo, 2015/01/23
- [Guile-commits] 56/88: GOOPS cleanup to use SRFI-1 better, Andy Wingo, 2015/01/23
- [Guile-commits] 57/88: append-map rather than mapappend, Andy Wingo, 2015/01/23
- [Guile-commits] 58/88: GOOPS utils module cleanups, Andy Wingo, 2015/01/23
- [Guile-commits] 55/88: Cosmetic goops refactors., Andy Wingo, 2015/01/23