summaryrefslogtreecommitdiff
path: root/libguile/error.c
diff options
context:
space:
mode:
authorDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2000-05-15 11:47:48 +0000
committerDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2000-05-15 11:47:48 +0000
commitf5f2dcffbea9a33f0e1d2adbe07b20fcf7ac3322 (patch)
treee71c3be5e7b8d307a9a608fd71ff9fe9fc7e5d23 /libguile/error.c
parentae09e7ac288fd8fd467d3278bff2e9ccbefb862d (diff)
downloadguile-f5f2dcffbea9a33f0e1d2adbe07b20fcf7ac3322.tar.gz
* Wrapped deprecated code between #if (SCM_DEBUG_DEPRECATED == 0) #endif.
* Replace use of deprecated macros SCM_INPORTP, SCM_OUTPORTP, SCM_ICHRP.
Diffstat (limited to 'libguile/error.c')
-rw-r--r--libguile/error.c6
1 files changed, 6 insertions, 0 deletions
diff --git a/libguile/error.c b/libguile/error.c
index c22913963..5eab67afb 100644
--- a/libguile/error.c
+++ b/libguile/error.c
@@ -159,6 +159,9 @@ scm_syserror_msg (const char *subr, const char *message, SCM args, int eno)
scm_cons (SCM_MAKINUM (eno), SCM_EOL));
}
+
+#if (SCM_DEBUG_DEPRECATED == 0)
+
/* scm_sysmissing is no longer used in libguile. it can probably be
removed after a release or two. there's a comment in NEWS about it
(2000-01-09). */
@@ -180,6 +183,9 @@ scm_sysmissing (const char *subr)
#endif
}
+#endif /* SCM_DEBUG_DEPRECATED == 0 */
+
+
SCM_SYMBOL (scm_num_overflow_key, "numerical-overflow");
void
scm_num_overflow (const char *subr)