((lambda (:keys k1 :defaults-to (+ 1 2 3)) (assert (= k1 6)))) ((lambda (:keys k1 :defaults-to ()) (when k1 (assert ())) (assert (= k1 ()))))