Merge pull request #176 from KeenS/test-values

fix a bug of `test-values` and unlock the test cases that use `test-valu...
2014-07-22 09:28:23 +09:00
parent e7eeebb343 341e4048eb
commit 44e80e62f4
2 changed files with 10 additions and 12 deletions
@@ -69,9 +69,7 @@
  (define-syntax test-values
    (syntax-rules ()
      ((_ expect expr)
-       (test-values #f expect expr))
-      ((_ name expect expr)
-       (test name (call-with-values (lambda () expect) (lambda results results))
+       (test (call-with-values (lambda () expect) (lambda results results))
             (call-with-values (lambda () expr) (lambda results results))))))