diff options
Diffstat (limited to 'libguile/error.c')
-rw-r--r-- | libguile/error.c | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/libguile/error.c b/libguile/error.c index 067b3cdb1..850bf5b7d 100644 --- a/libguile/error.c +++ b/libguile/error.c @@ -316,6 +316,16 @@ scm_wta (SCM arg, const char *pos, const char *s_subr) scm_wrong_type_arg (s_subr, 7, arg); case SCM_WNA: scm_wrong_num_args (arg); + +#if (SCM_DEBUG_DEPRECATED == 0) + + case SCM_OUTOFRANGE: + scm_out_of_range (s_subr, arg); + case SCM_NALLOC: + scm_memory_error (s_subr); + +#endif /* SCM_DEBUG_DEPRECATED == 0 */ + default: /* this shouldn't happen. */ scm_misc_error (s_subr, "Unknown error", SCM_EOL); |