summaryrefslogtreecommitdiff
path: root/libguile/debug.c
diff options
context:
space:
mode:
authorDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2002-06-30 22:03:43 +0000
committerDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2002-06-30 22:03:43 +0000
commit8505e285ec9339884d4d36c1394907aa3101291c (patch)
tree4e76d22aa3a08391dd72933083922162cc280076 /libguile/debug.c
parent732b93273252451186bb0ed5d6dc129019676296 (diff)
downloadguile-8505e285ec9339884d4d36c1394907aa3101291c.tar.gz
* backtrace.c (SCM_ASSERT), debug.c (scm_debug_options), eval.c
(scm_lookupcar, scm_lookupcar1, scm_badargsp, SCM_CEVAL, SCM_APPLY, scm_map, scm_for_each), feature.c (scm_init_feature), gsubr.c (scm_gsubr_apply), numbers.c (scm_logand, scm_logior, scm_logxor, scm_i_dbl2big), srcprop.c (scm_source_properties, scm_set_source_properties_x, scm_source_property): Removed compile time option SCM_RECKLESS to clean up the code. Full number of arguments checking of closures is mandatory now. However, the option to disable the checking has most probably not been used anyway. * srcprop.c (scm_source_properties, scm_set_source_properties_x, scm_source_property): Use !SCM_CONSP instead of SCM_NCONSP.
Diffstat (limited to 'libguile/debug.c')
-rw-r--r--libguile/debug.c7
1 files changed, 1 insertions, 6 deletions
diff --git a/libguile/debug.c b/libguile/debug.c
index a7e2e9932..05c0cf3bd 100644
--- a/libguile/debug.c
+++ b/libguile/debug.c
@@ -81,17 +81,12 @@ SCM_DEFINE (scm_debug_options, "debug-options-interface", 0, 1, 0,
{
SCM ans;
SCM_DEFER_INTS;
- ans = scm_options (setting,
- scm_debug_opts,
- SCM_N_DEBUG_OPTIONS,
- FUNC_NAME);
-#ifndef SCM_RECKLESS
+ ans = scm_options (setting, scm_debug_opts, SCM_N_DEBUG_OPTIONS, FUNC_NAME);
if (!(1 <= SCM_N_FRAMES && SCM_N_FRAMES <= SCM_MAX_FRAME_SIZE))
{
scm_options (ans, scm_debug_opts, SCM_N_DEBUG_OPTIONS, FUNC_NAME);
SCM_OUT_OF_RANGE (1, setting);
}
-#endif
SCM_RESET_DEBUG_MODE;
scm_stack_checking_enabled_p = SCM_STACK_CHECKING_P;
scm_debug_eframe_size = 2 * SCM_N_FRAMES;