Insert BODY into the fixture named FIXTURE-NAME. See Also: DEF-FIXTURE
(defmacro with-fixture (fixture-name args &body body) "Insert BODY into the fixture named FIXTURE-NAME. See Also: DEF-FIXTURE" (assert (get-fixture fixture-name) (fixture-name) "Unknown fixture ~S." fixture-name) (destructuring-bind (largs &rest lbody) (get-fixture fixture-name) `(macrolet ((&body () '(progn ,@body))) (funcall (lambda ,largs ,@lbody) ,@args))))Source Context