                           (t/is (= result 10))
                           (done)))))))
 
+;; --- Do Expression tests
 
 (t/deftest do-expression
   #?(:cljs

       :clj
       (t/is (= @p ::value)))))


#?(:clj
   (t/deftest async-let

  (p/promise (fn [_ reject]
               (p/schedule sleep #(reject value)))))

;; --- Core Interface Tests

(t/deftest print-promise
  (t/is (string? (pr-str (p/promise nil)))))
