From f25da8fd7d0549f3db25e569c00b7803ebdc9a20 Mon Sep 17 00:00:00 2001 From: Eli Barzilay Date: Mon, 15 Sep 2008 09:57:56 +0000 Subject: [PATCH] require at least one test expression svn: r11756 --- collects/tests/eli-tester.ss | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/collects/tests/eli-tester.ss b/collects/tests/eli-tester.ss index 22d0643391..c978e5a6c7 100644 --- a/collects/tests/eli-tester.ss +++ b/collects/tests/eli-tester.ss @@ -95,8 +95,8 @@ (reverse exns)))))))))))) (provide test test*) -(define-syntax-rule (test x ...) (run-tests (test-thunk x ...) #f)) -(define-syntax-rule (test* x ...) (run-tests (test-thunk x ...) #t)) +(define-syntax-rule (test x0 x ...) (run-tests (test-thunk x0 x ...) #f)) +(define-syntax-rule (test* x0 x ...) (run-tests (test-thunk x0 x ...) #t)) #; ;; test the `test' macro