suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

require at least one test expression

Browse Source 
svn: r11756
This commit is contained in:
Eli Barzilay 2008-09-15 09:57:56 +00:00
parent 99dc711ac0
commit f25da8fd7d
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
collects/tests/eli-tester.ss
View File

@ -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