From bdbb83cf3847669c0e929e4292a25e2d48fa9f81 Mon Sep 17 00:00:00 2001 From: Marco Baringer Date: Fri, 20 Jan 2006 18:26:39 +0100 Subject: [PATCH] Made run!'s first argument optional (defaults to *suite*) --- src/run.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/run.lisp b/src/run.lisp index 3f03cfa..c070f44 100644 --- a/src/run.lisp +++ b/src/run.lisp @@ -194,7 +194,7 @@ run.")) ;;;; ** Public entry points -(defun run! (test-spec) +(defun run! (&optional (test-spec *suite*)) "Equivalent to (explain (run TEST-SPEC))." (explain! (run test-spec))) -- 1.7.10.4