summaryrefslogtreecommitdiff
path: root/libguile/options.c
diff options
context:
space:
mode:
authorMikael Djurfeldt <djurfeldt@nada.kth.se>1998-08-21 08:15:31 +0000
committerMikael Djurfeldt <djurfeldt@nada.kth.se>1998-08-21 08:15:31 +0000
commit3243d7231cc78ae433442c946bf48f7ee0da0e77 (patch)
tree715e5c885214468d321848b13c90a3edc2cc2d78 /libguile/options.c
parent066dacf85deeeee8ee817f5e5080f3a08274e8f8 (diff)
downloadguile-3243d7231cc78ae433442c946bf48f7ee0da0e77.tar.gz
* options.c (scm_options): Bugfix: Allow empty list of options!
Diffstat (limited to 'libguile/options.c')
-rw-r--r--libguile/options.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/libguile/options.c b/libguile/options.c
index a416adf8c..ad3783198 100644
--- a/libguile/options.c
+++ b/libguile/options.c
@@ -123,6 +123,7 @@ scm_options (new_mode, options, n, s)
char *s;
{
int i, docp = (!SCM_UNBNDP (new_mode)
+ && !SCM_NULLP (new_mode)
&& (SCM_IMP (new_mode) || SCM_NCONSP (new_mode)));
SCM ans = SCM_EOL, ls;
for (i = 0; i < n; ++i)