diff options
Diffstat (limited to 'stdlib/doloop.tl')
| -rw-r--r-- | stdlib/doloop.tl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/stdlib/doloop.tl b/stdlib/doloop.tl index 3b0c7892..c9eac310 100644 --- a/stdlib/doloop.tl +++ b/stdlib/doloop.tl @@ -27,7 +27,7 @@ (defun sys:expand-doloop (f vars cexp body) (let ((xvars (mapcar (tc - (((:whole w v i s . r)) + (((:whole w t t t . r)) (if r (compile-error f "excess elements in ~s" w) w)) (((:whole w v i . r)) (if r |