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)