diff options
Diffstat (limited to 'test-suite/tests/fluids.test')
-rw-r--r-- | test-suite/tests/fluids.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/test-suite/tests/fluids.test b/test-suite/tests/fluids.test index 6eb5095f3..f00fdc480 100644 --- a/test-suite/tests/fluids.test +++ b/test-suite/tests/fluids.test @@ -35,7 +35,7 @@ (with-fluids ((c #t)) c)) - (expect-fail "fluids not modified if nonfluid passed to with-fluids" + (pass-if "fluids not modified if nonfluid passed to with-fluids" (catch 'wrong-type-arg (lambda () (with-fluids ((a #t) |