├── .gitignore ├── deps.edn ├── src └── app │ ├── utils.cljs │ ├── test.cljs │ └── core.cljs └── README.md /.gitignore: -------------------------------------------------------------------------------- 1 | .cpcache 2 | -------------------------------------------------------------------------------- /deps.edn: -------------------------------------------------------------------------------- 1 | {:deps {org.clojure/clojure {:mvn/version "1.10.1"} 2 | org.clojure/clojurescript {:mvn/version "1.10.597"}}} 3 | -------------------------------------------------------------------------------- /src/app/utils.cljs: -------------------------------------------------------------------------------- 1 | (ns app.utils 2 | (:require [cljs.test :refer [async]])) 3 | 4 | (defn test-promise [p] 5 | (async done (.then p #(done)))) 6 | -------------------------------------------------------------------------------- /README.md: -------------------------------------------------------------------------------- 1 | ``` 2 | clj -m cljs.main -re node 3 | (require 'app.test) 4 | (app.test/run-tests) 5 | (require 'app.test :reload) 6 | (app.test/run-tests) 7 | ``` 8 | -------------------------------------------------------------------------------- /src/app/test.cljs: -------------------------------------------------------------------------------- 1 | (ns app.test 2 | (:require [cljs.test] 3 | [app.core])) 4 | 5 | (defn run-tests [] 6 | (cljs.test/run-tests (cljs.test/empty-env) 'app.core)) 7 | -------------------------------------------------------------------------------- /src/app/core.cljs: -------------------------------------------------------------------------------- 1 | (ns app.core 2 | (:require [cljs.test :refer [deftest is async]] 3 | [app.utils])) 4 | 5 | (deftest test-async 6 | (app.utils/test-promise 7 | (-> (.resolve js/Promise) 8 | (.then #(is false))))) 9 | --------------------------------------------------------------------------------