diff options
Diffstat (limited to 'libguile/stackchk.c')
-rw-r--r-- | libguile/stackchk.c | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/libguile/stackchk.c b/libguile/stackchk.c index 2e22edbf7..b10373e7b 100644 --- a/libguile/stackchk.c +++ b/libguile/stackchk.c @@ -57,7 +57,11 @@ void scm_report_stack_overflow () { scm_stack_checking_enabled_p = 0; - scm_wta (SCM_UNDEFINED, (char *) SCM_STACK_OVFLOW, NULL); + lgh_error (scm_stack_overflow_key, + NULL, + "Stack overflow", + SCM_BOOL_F, + SCM_BOOL_F); } #endif |