add error handler

main.fnl

@@ -129,6 +129,8 @@
             :host addr
             :port (tonumber port)
             :onstream on-stream
+            :onerror (fn [server ctx op err errno]
+                       (print (view { : server : ctx : err : errno })))
             :tls true
             :ctx (ssl-context)
             }))))