1 (in-package :all-tests)
2 
3 (defsuite all-suite ())
4 
5 (defun run-all-tests (&key (use-debugger t))
6   (clunit:run-suite 'all-suite :use-debugger use-debugger
7                                :report-progress t))
8 
9 ;; (run-all-tests)