diff options
| author | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2001-03-17 13:34:21 +0000 |
|---|---|---|
| committer | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2001-03-17 13:34:21 +0000 |
| commit | b3fcac341bca85278d1694d09e2d3207edb5ab94 (patch) | |
| tree | 9ffd590ab04035fbe899a84195452548fdd0edf7 /libguile/error.h | |
| parent | 68baa7e7f8088e21eaa3d0b568a985528314ada5 (diff) | |
| download | guile-b3fcac341bca85278d1694d09e2d3207edb5ab94.tar.gz | |
* __scm.h (SCM_ASSERT, SCM_WTA_DISPATCH_0, SCM_WTA_DISPATCH_1,
SCM_WTA_DISPATCH_2, SCM_WTA_DISPATCH_n): Don't call scm_wta, call
scm_wrong_type_arg instead.
(SCM_WNA): Deprecated.
* error.[ch] (scm_wta): Deprecated.
* numbers.c (s_i_log): Minor comment fix.
* read.c (scm_lreadr), unif.c (scm_aind, scm_shap2ra,
scm_make_shared_array, scm_transpose_array, scm_enclose_array,
scm_array_in_bounds_p): Don't use SCM_ASSERT to check for
wrong-num-args or misc errors.
* unif.c (scm_make_shared_array, scm_transpose_array,
scm_enclose_array, scm_array_in_bounds_p, scm_array_set_x):
Validate the rest argument (note: this is only done when guile is
built with SCM_DEBUG_REST_ARGUMENT=1)
(scm_array_in_bounds_p, scm_uniform_vector_ref, scm_array_set_x):
Replace calls to scm_wrong_num_args by SCM_WRONG_NUM_ARGS.
* validate.h (SCM_FUNC_NAME, SCM_VALIDATE_NUMBER_COPY,
SCM_VALIDATE_NUMBER_DEF_COPY): Deprecated.
Diffstat (limited to 'libguile/error.h')
| -rw-r--r-- | libguile/error.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/error.h b/libguile/error.h index 180e70d3f..ea7d8d2fc 100644 --- a/libguile/error.h +++ b/libguile/error.h @@ -81,7 +81,6 @@ extern void scm_wrong_type_arg_msg (const char *subr, int pos, extern void scm_memory_error (const char *subr) SCM_NORETURN; extern void scm_misc_error (const char *subr, const char *message, SCM args) SCM_NORETURN; -extern SCM scm_wta (SCM arg, const char *pos, const char *s_subr); extern void scm_init_error (void); @@ -89,6 +88,7 @@ extern void scm_init_error (void); #if (SCM_DEBUG_DEPRECATED == 0) extern void scm_sysmissing (const char *subr) SCM_NORETURN; +extern SCM scm_wta (SCM arg, const char *pos, const char *s_subr); #endif /* SCM_DEBUG_DEPRECATED == 0 */ |