Add promise and deliver (#260)
This commit is contained in:
parent
9361fd6797
commit
50f0630b38
1 changed files with 6 additions and 0 deletions
|
|
@ -160,6 +160,12 @@
|
||||||
|
|
||||||
(deftest future-test
|
(deftest future-test
|
||||||
(is (= 6 (bb nil "@(future (+ 1 2 3))"))))
|
(is (= 6 (bb nil "@(future (+ 1 2 3))"))))
|
||||||
|
|
||||||
|
(deftest promise-test
|
||||||
|
(is (= :timeout (bb nil "(deref (promise) 1 :timeout)")))
|
||||||
|
(is (= :ok (bb nil "(let [x (promise)]
|
||||||
|
(deliver x :ok)
|
||||||
|
@x)"))))
|
||||||
|
|
||||||
(deftest process-builder-test
|
(deftest process-builder-test
|
||||||
(is (str/includes? (bb nil "
|
(is (str/includes? (bb nil "
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue