> 1 <
Автор | Сообщение |
Познающий
17 сообщений |
#1531 2010-03-09 21:45 GMT+3 часа(ов) |
имеется у нас список в котором много чего: setq s'(1 2 3 4 (4 5) ((( ))) 4 (()) )
вот недели две бьюсь - не пойму - как вынести списки, в которых пустые списки - считается мусором =( |
|
Fallen_s4e
114 сообщений |
#1532 2010-03-09 22:38 GMT+3 часа(ов) |
(defun garbage-p(elt) CL-USER> (garbage-p '(1 2 3 4 (4 5) ((( ))) 4 (()) )) отредактировал(а) Fallen_s4e: 2010-03-09 22:43 GMT+3 часа(ов) |
|
> 1 <