4 lines
102 B
Text
4 lines
102 B
Text
(de insertAfter (Item Lst New)
|
|
(when (member Item Lst)
|
|
(con @ (cons New (cdr @))) )
|
|
Lst )
|