summaryrefslogtreecommitdiffstats
path: root/eval.c
diff options
context:
space:
mode:
Diffstat (limited to 'eval.c')
-rw-r--r--eval.c7
1 files changed, 3 insertions, 4 deletions
diff --git a/eval.c b/eval.c
index 8963bb2f..caa3c501 100644
--- a/eval.c
+++ b/eval.c
@@ -3924,10 +3924,9 @@ static val do_expand(val form, val menv)
} else if (sym == var_s || sym == expr_s) {
return form;
} else {
- /* funtion call
- also handles: prog1, call, if, and, or,
- unwind-protect, return, dwim, set, inc, dec,
- push, pop, flip, and with-saved-vars. */
+ /* funtion call expansion also handles: prog1, call, if, and, or,
+ unwind-protect, return and other special forms whose arguments
+ are evaluated */
val form_ex = dot_to_apply(form, nil);
val sym_ex = first(form_ex);
val args = rest(form_ex);