path: root/test/native/native_hello.ml

open! Portal_tcp

let () =
  let jid = Sys.getenv "FLESH_JID"
  and _password = Sys.getenv "FLESH_PASSWORD"
  in let domain = (List.nth (String.split_on_char '@' jid) 1)
     in connect domain