diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2016-12-20 19:57:51 -0800 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2016-12-20 19:57:51 -0800 |
commit | f2df1d0b58a3436e2137cb57b86bae805c033f3a (patch) | |
tree | 47e62621ac1a677c77538c69d95556f0ca8a6140 /eval.c | |
parent | da23d76b54532d8d172388c1faeb6c97200d2a95 (diff) | |
download | txr-f2df1d0b58a3436e2137cb57b86bae805c033f3a.tar.gz txr-f2df1d0b58a3436e2137cb57b86bae805c033f3a.tar.bz2 txr-f2df1d0b58a3436e2137cb57b86bae805c033f3a.zip |
comment change in expander.
* eval.c (do_expand): Fix outdated comment about what
forms are expanded like function calls.
Diffstat (limited to 'eval.c')
-rw-r--r-- | eval.c | 7 |
1 files changed, 3 insertions, 4 deletions
@@ -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); |