beowulf/resources/mexpr/cond-test.mexpr.lsp

4 lines
52 B
Common Lisp

;; from page 5
[eq[car[x];A]->cons[B;cdr[x]];T->x]