slime/bin/tests/evaluation_of_default_args.slime

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

((lambda (:keys k1 :defaults-to ())
   (when k1
     (assert ()))
   (assert (= k1 ()))))