(setf a '(1 2 3))
(dolist (d '(1 2 3))
(cl-delete d a))
a
=> (1)
(cl-nunion a '(4 5 6))
a
=> (1)
чего я не понимаю?
(setf a '(1 2 3))
(dolist (d '(1 2 3))
(cl-delete d a))
a
=> (1)
(cl-nunion a '(4 5 6))
a
=> (1)
чего я не понимаю?
Ответ на:
комментарий
от theNamelessOne
Ответ на:
комментарий
от arte-at-marte
Ответ на:
комментарий
от theNamelessOne