diff options
Diffstat (limited to 'test/native/native_hello.ml')
| -rw-r--r-- | test/native/native_hello.ml | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/test/native/native_hello.ml b/test/native/native_hello.ml index bb38ee6..b5456c1 100644 --- a/test/native/native_hello.ml +++ b/test/native/native_hello.ml @@ -1,5 +1,8 @@ +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 print_endline domain + in let port = tcp_endpoint domain + in print_endline (string_of_int port) |