diff options
| author | Ivar Refsdal <ivar.refsdal@nsd.no> | 2021-09-17 14:28:15 +0200 |
|---|---|---|
| committer | Ivar Refsdal <ivar.refsdal@nsd.no> | 2021-09-17 14:28:15 +0200 |
| commit | 7c3f605d9420ce8ff1d8e8b226a63d7ee1dacf1f (patch) | |
| tree | 38842eb925f1fd655dace4f35c9b54f82cfbad33 /test | |
| parent | Start add bindings ... (diff) | |
| download | fiinha-7c3f605d9420ce8ff1d8e8b226a63d7ee1dacf1f.tar.gz fiinha-7c3f605d9420ce8ff1d8e8b226a63d7ee1dacf1f.tar.xz | |
Capture-bindings works
Diffstat (limited to 'test')
| -rw-r--r-- | test/com/github/ivarref/yoltq/virtual_test.clj | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/test/com/github/ivarref/yoltq/virtual_test.clj b/test/com/github/ivarref/yoltq/virtual_test.clj index 575dc1b..e2ea19b 100644 --- a/test/com/github/ivarref/yoltq/virtual_test.clj +++ b/test/com/github/ivarref/yoltq/virtual_test.clj @@ -254,9 +254,11 @@ (deftest binding-test (let [conn (u/empty-conn)] (dq/init! {:conn conn - :bindings [#'*some-binding*]}) + :capture-bindings [#'*some-binding*]}) (dq/add-consumer! :q (fn [_] *some-binding*)) (binding [*some-binding* 1] @(d/transact conn [(dq/put :q nil)])) - #_(binding [*some-binding* 2] @(d/transact conn [(dq/put :q nil)])) - #_@(d/transact conn [(dq/put :q nil)]) - (is (= 1 (vq/consume-expect! :q :done))))) + (binding [*some-binding* 2] @(d/transact conn [(dq/put :q nil)])) + @(d/transact conn [(dq/put :q nil)]) + (is (= 1 (vq/consume-expect! :q :done))) + (is (= 2 (vq/consume-expect! :q :done))) + (is (nil? (vq/consume-expect! :q :done))))) |