oops rename in tests subdir too

original commit: ca88fdd7e52bc57a83e45131fdabc2dddbe4fef4
This commit is contained in:
John Clements 2011-03-08 17:34:57 -08:00
parent 4878d7b4ab
commit 4b92fff7c6

View File

@ -165,10 +165,10 @@
(check-equal? foo 3)))
(test-case
"Test simple foldts"
"Test simple foldts-test-suite"
(check-equal?
'(S (C C C))
(foldts
(foldts-test-suite
(lambda (suite name before after seed)
seed)
(lambda (suite name before after seed kid-seed)