Searched refs:cdddar (Results 1 - 2 of 2) sorted by relevance

/xsrc/external/mit/xedit/dist/lisp/modules/
H A Dlisp.lsp134 (defsetf cdddar (list) (value) `(progn (rplacd (cddar ,list) ,value) ,value)) function
/xsrc/external/mit/xedit/dist/lisp/test/
H A Dlist.lsp350 (eql-test 4 #'cdddar '((1 2 3 . 4) 5))

Completed in 5 milliseconds