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

Fix lots of indentation mistakes.

Browse Source 
(Found by my ayatollah script...)

original commit: af6be85ff576e475753a46bd3f1690eb8bf88a28
This commit is contained in:
Eli Barzilay 2013-03-14 07:15:43 -04:00
parent f51a916705
commit 635a8a229f
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
collects/rackunit/private/test-suite.rkt
View File

@ -133,8 +133,7 @@
(define (tests->test-suite-action tests)
(lambda (fdown fup fhere seed)
(parameterize
([current-seed seed])
(parameterize ([current-seed seed])
(for-each
(lambda (t)
(cond
@ -152,7 +151,7 @@
(format "tests->test-suite-action received ~a in list of tests ~a, which is not a test." t tests)
(current-continuation-marks)))]))
tests)
(current-seed))))
(current-seed))))
;; make-test-suite : string [#:before thunk] [#:after thunk] (listof test?) -> test-suite?
;;