diff options
author | Greg J. Badros <gjb@cs.washington.edu> | 2000-01-04 22:23:42 +0000 |
---|---|---|
committer | Greg J. Badros <gjb@cs.washington.edu> | 2000-01-04 22:23:42 +0000 |
commit | 0b5f3f34c220329c3fadcf75d881fab168ae35e7 (patch) | |
tree | e212fa265339e4e70e2af96807ccab57c2db173a /libguile/options.c | |
parent | db62436ececa2f491a9c87147062f5a16aec813e (diff) | |
download | guile-0b5f3f34c220329c3fadcf75d881fab168ae35e7.tar.gz |
* options.c, objects.c, keywords.c, gc.c: Some redundant SCM_NIMP
removals from Dirk Hermann.
* alist.c: Rename formals to match the parameter names in the
documentation, updates to documentation. Thanks Dirk Hermann!
Diffstat (limited to 'libguile/options.c')
-rw-r--r-- | libguile/options.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/libguile/options.c b/libguile/options.c index 64143cb4b..750bd9526 100644 --- a/libguile/options.c +++ b/libguile/options.c @@ -177,8 +177,7 @@ scm_options (SCM arg, scm_option options[], int n, const char *s) goto cont; case SCM_OPTION_INTEGER: new_mode = SCM_CDR (new_mode); - SCM_ASSERT (SCM_NIMP (new_mode) - && SCM_CONSP (new_mode) + SCM_ASSERT ( SCM_CONSP (new_mode) && SCM_INUMP (SCM_CAR (new_mode)), new_mode, SCM_ARG1, |