diff options
author | Rob Browning <rlb@defaultvalue.org> | 2001-04-27 21:08:25 +0000 |
---|---|---|
committer | Rob Browning <rlb@defaultvalue.org> | 2001-04-27 21:08:25 +0000 |
commit | 3a2ad295bc18d4693950734050c61b375d0454bb (patch) | |
tree | 70756f58d2a06bf274f6833c82a5a06936749d80 /libguile/error.c | |
parent | 2e5b312b80f55a7ca49c0b7ed79195558e3fa7e6 (diff) | |
download | guile-3a2ad295bc18d4693950734050c61b375d0454bb.tar.gz |
* error.c (scm_sysmissing): deprecation expired - removed.
Diffstat (limited to 'libguile/error.c')
-rw-r--r-- | libguile/error.c | 27 |
1 files changed, 0 insertions, 27 deletions
diff --git a/libguile/error.c b/libguile/error.c index d8fcc7aa8..88ba47c7d 100644 --- a/libguile/error.c +++ b/libguile/error.c @@ -184,33 +184,6 @@ 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). */ -void -scm_sysmissing (const char *subr) -{ -#ifdef ENOSYS - scm_error (scm_system_error_key, - subr, - "~A", - scm_cons (scm_makfrom0str (strerror (ENOSYS)), SCM_EOL), - scm_cons (SCM_MAKINUM (ENOSYS), SCM_EOL)); -#else - scm_error (scm_system_error_key, - subr, - "Missing function", - SCM_BOOL_F, - scm_cons (SCM_MAKINUM (0), SCM_EOL)); -#endif -} - -#endif /* SCM_DEBUG_DEPRECATED == 0 */ - - SCM_SYMBOL (scm_num_overflow_key, "numerical-overflow"); void scm_num_overflow (const char *subr) |