|
|
|
@ -206,7 +206,7 @@ This function's anaphoric counterpart is `--map'." |
|
|
|
Each element of LIST in turn is bound to `it' before evaluating |
|
|
|
Each element of LIST in turn is bound to `it' before evaluating |
|
|
|
BODY. |
|
|
|
BODY. |
|
|
|
This is the anaphoric counterpart to `-map'." |
|
|
|
This is the anaphoric counterpart to `-map'." |
|
|
|
(declare (debug (form form))) |
|
|
|
(declare (debug (def-form form))) |
|
|
|
`(mapcar (lambda (it) (ignore it) ,form) ,list)) |
|
|
|
`(mapcar (lambda (it) (ignore it) ,form) ,list)) |
|
|
|
|
|
|
|
|
|
|
|
(defmacro --reduce-from (form init list) |
|
|
|
(defmacro --reduce-from (form init list) |
|
|
|
|