Re: remove sublist

[Robert L.]

On 4/2/2018, Emanuel Berg wrote:

> 
>     (cl-remove-if
>      (lambda (s) (or (string= "a" s)
>                      (string= "b" s) ))
>      '("0" "a" "b" "c" "d") )

(defun remove-these (targets xs)
  (let (result)
    (dolist (x xs (reverse result))
      (unless (member x targets)
        (push x result)))))

(remove-these '(a e) '(a b e f o a g))
 ===>
(b f o g)

-- 
[Amazon bans history book after it received 300 5-star reviews.]
http://archive.org/details/nolies