luciano/babashka
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix test

Browse source
This commit is contained in:
Michiel Borkent 2021-09-01 11:54:09 +02:00
parent 23ba52a813
commit 1da01203ce
1 changed files with 19 additions and 16 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
test-resources/lib_tests/java_http_clj/smoke_test.clj
View file

@ -23,6 +23,9 @@
(try ~@body (finally (s# :timeout 100))))) (try ~@body (finally (s# :timeout 100)))))
(deftest websockets-smoke-test (deftest websockets-smoke-test
(when-not (and
(= "aarch64" (System/getenv "BABASHKA_ARCH"))
(= "true" (System/getenv "BABASHKA_STATIC")))
(with-ws-server {:on-receive #(httpkit.server/send! %1 %2)} (with-ws-server {:on-receive #(httpkit.server/send! %1 %2)}
(is (= "zomg websockets!" (is (= "zomg websockets!"
(let [p (promise) (let [p (promise)
@ -38,4 +41,4 @@
(ws-client/send "zomg websockets!")) (ws-client/send "zomg websockets!"))
(try (deref p 5000 ::timeout) (try (deref p 5000 ::timeout)
(finally (finally
(ws-client/close ws)))))))) (ws-client/close ws)))))))))