This commit is contained in:
Michiel Borkent 2024-02-19 20:59:10 +01:00
parent 4bc65d6ac0
commit 1a75960c42
2 changed files with 6 additions and 0 deletions

View file

@ -743,6 +743,8 @@
java.util.Iterator java.util.Iterator
(instance? javax.crypto.SecretKey v) (instance? javax.crypto.SecretKey v)
javax.crypto.SecretKey javax.crypto.SecretKey
(instance? javax.net.ssl.SSLSocketFactory v)
javax.net.ssl.SSLSocketFactory
(instance? java.lang.Thread v) (instance? java.lang.Thread v)
java.lang.Thread java.lang.Thread
(instance? java.security.cert.X509Certificate v) (instance? java.security.cert.X509Certificate v)

View file

@ -50,3 +50,7 @@
(Thread/sleep (/ 1 200) (/ 1 200)) (Thread/sleep (/ 1 200) (/ 1 200))
(Thread/sleep (java.time.Duration/ofMillis 1)) (Thread/sleep (java.time.Duration/ofMillis 1))
true"))) true")))
(deftest SSL-test
(is (= :user/success
(bb nil "(try (.createSocket (javax.net.ssl.SSLSocketFactory/getDefault) \"localhost\" 4444) (catch java.net.ConnectException e ::success))"))))