From e1724d200d3d1c81e67c5a5b20413f4889a3acce Mon Sep 17 00:00:00 2001 From: Gary Houston Date: Sat, 14 Sep 1996 07:47:50 +0000 Subject: * numbers.c: use SCM_NUM_OVERFLOW instead of scm_wta or ASSERT. * error.c, error.h: setup scm_num_overflow key. * __scm.h: SCM_NUM_OVERFLOW: macro for reporting numerical overflow. Remove definition of SCM_OVSCM_FLOW. * fports.c (scm_open_file): use SCM_SYSERROR_M. * __scm.h: SCM_SYSERROR_M: new macro for system errors with an explicit message and args. * error.c, error.h, __scm.h: change system_error_sym to scm_system_error. * error.c (system_error_sym): remove leading %% from the Scheme name "%%system-error". * __scm.h (SCM_SYSMISSING): Redefine using lgh_error. * boot-9.scm: remove leading %% from references to '%%system-error. (%%handle-system-error): don't pass all the thrown arguments when aborting, just the key and subr. Remove the code to "Install default handlers for built-in errors." Remove the definition of the syserror procedure. Associate 'numerical-overflow with default handler. --- libguile/error.h | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'libguile/error.h') diff --git a/libguile/error.h b/libguile/error.h index 816d4f767..046a38f0d 100644 --- a/libguile/error.h +++ b/libguile/error.h @@ -47,7 +47,8 @@ extern int scm_ints_disabled; -extern SCM system_error_sym; +extern SCM scm_system_error; +extern SCM scm_num_overflow; -- cgit v1.2.3