diff options
Diffstat (limited to 'lisp/subr.el')
| -rw-r--r-- | lisp/subr.el | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/lisp/subr.el b/lisp/subr.el index 4cc80e9be6f..6ce02b79a0a 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -222,11 +222,6 @@ Then evaluate RESULT to get return value, default nil. ,@(if (cdr (cdr spec)) `((setq ,(car spec) nil) ,@(cdr (cdr spec)))))))) -(defmacro filter (condp lst) - "Return the list consisting of elements in LST for which CONDP is not nil." - `(delq nil - (mapcar (lambda (x) (and (funcall ,condp x) x)) ,lst))) - (defmacro dotimes (spec &rest body) "Loop a certain number of times. Evaluate BODY with VAR bound to successive integers running from 0, |