summaryrefslogtreecommitdiffstats
path: root/eval.c
diff options
context:
space:
mode:
Diffstat (limited to 'eval.c')
-rw-r--r--eval.c4
1 files changed, 3 insertions, 1 deletions
diff --git a/eval.c b/eval.c
index 3e2d9821..41ebd8bc 100644
--- a/eval.c
+++ b/eval.c
@@ -1784,7 +1784,9 @@ val expand(val form)
if (hashform == hashform_ex && resform == resform_ex && body == body_ex)
return form;
return cons(sym, cons(cons(keysym,
- cons(valsym, cons(hashform_ex, nil))),
+ cons(valsym,
+ cons(hashform_ex,
+ cons(resform_ex, nil)))),
body_ex));
} else if (sym == quasi_s) {
val quasi = rest(form);