File tree Expand file tree Collapse file tree 2 files changed +2
-2
lines changed Expand file tree Collapse file tree 2 files changed +2
-2
lines changed Original file line number Diff line number Diff line change 22
22
((_ test-case: name rest ...)
23
23
#' (test-case name (test-inline rest ...)))
24
24
((_ > form > rest ...)
25
- #' (begin (when *test-versbose * (displayln " ... " 'form )) form (test-inline > rest ...)))
25
+ #' (begin (when std/test# *test-verbose * (displayln " ... " 'form )) form (test-inline > rest ...)))
26
26
((_ > test result rest ...)
27
27
#' (begin (check test => 'result ) (test-inline rest ...)))
28
28
((_) #!void)))
Original file line number Diff line number Diff line change @@ -1130,7 +1130,7 @@ This is after state in the train of thought so is defined here.
1130
1130
((_ test-case: name rest ...)
1131
1131
#'(test-case name (test-inline rest ...)))
1132
1132
((_ > form > rest ...)
1133
- #'(begin (when std/test#*test-versbose * (displayln "... " 'form)) form (test-inline > rest ...)))
1133
+ #'(begin (when std/test#*test-verbose * (displayln "... " 'form)) form (test-inline > rest ...)))
1134
1134
((_ > test result rest ...)
1135
1135
#'(begin (check test => 'result) (test-inline rest ...)))
1136
1136
((_) #!void)))
You can’t perform that action at this time.
0 commit comments