[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Guile-commits] 01/01: Fix new thread-local fluids test
From: |
Andy Wingo |
Subject: |
[Guile-commits] 01/01: Fix new thread-local fluids test |
Date: |
Tue, 7 Mar 2017 15:36:21 -0500 (EST) |
wingo pushed a commit to branch master
in repository guile.
commit 8157c2a3acc61b561903957f69e7e83163d5a1b5
Author: Andy Wingo <address@hidden>
Date: Tue Mar 7 21:35:52 2017 +0100
Fix new thread-local fluids test
* test-suite/tests/fluids.test ("dynamic states"): Fix test.
---
test-suite/tests/fluids.test | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/test-suite/tests/fluids.test b/test-suite/tests/fluids.test
index 9eca6f2..a5ca885 100644
--- a/test-suite/tests/fluids.test
+++ b/test-suite/tests/fluids.test
@@ -265,5 +265,5 @@
(pass-if "exception handler not captured"
(let ((state (catch #t (lambda () (current-dynamic-state)) error)))
(catch #t
- (lambda () (with-dynamic-state state (/ 1 0)))
+ (lambda () (with-dynamic-state state (lambda () (/ 1 0))))
(lambda _ #t)))))