diff options
author | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2002-06-30 22:03:43 +0000 |
---|---|---|
committer | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2002-06-30 22:03:43 +0000 |
commit | 8505e285ec9339884d4d36c1394907aa3101291c (patch) | |
tree | 4e76d22aa3a08391dd72933083922162cc280076 /libguile/gsubr.c | |
parent | 732b93273252451186bb0ed5d6dc129019676296 (diff) | |
download | guile-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/gsubr.c')
-rw-r--r-- | libguile/gsubr.c | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/libguile/gsubr.c b/libguile/gsubr.c index b8b15462f..42af8ad76 100644 --- a/libguile/gsubr.c +++ b/libguile/gsubr.c @@ -223,10 +223,8 @@ scm_gsubr_apply (SCM args) #endif args = SCM_CDR (args); for (i = 0; i < SCM_GSUBR_REQ (typ); i++) { -#ifndef SCM_RECKLESS if (SCM_NULLP (args)) scm_wrong_num_args (SCM_SNAME (SCM_GSUBR_PROC (self))); -#endif v[i] = SCM_CAR(args); args = SCM_CDR(args); } |