diff options
Diffstat (limited to 'stdlib/each-prod.tl')
| -rw-r--r-- | stdlib/each-prod.tl | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/stdlib/each-prod.tl b/stdlib/each-prod.tl index a084ff5d..be514920 100644 --- a/stdlib/each-prod.tl +++ b/stdlib/each-prod.tl @@ -57,8 +57,7 @@ (append-each-prod* 'append-each-prod) (sum-each-prod* 'sum-each-prod) (mul-each-prod* 'mul-each-prod))) - (syms [mapcar car vars]) - (inits [mapcar cadr vars])) + (syms [mapcar car vars])) ^(let* ,vars (,each-prod-op ,(zip syms syms) ,*body)))) |