From 49ce8ae1c398f71c1e2481d758dc8c1744712b3c Mon Sep 17 00:00:00 2001 From: Dimitri Sokolyuk Date: Fri, 23 Oct 2015 21:45:57 +0200 Subject: Working --- tda.erl | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/tda.erl b/tda.erl index 3bc67ca..68ed176 100644 --- a/tda.erl +++ b/tda.erl @@ -74,6 +74,7 @@ client() -> case gen_tcp:connect(Host, 33333, [binary, {active, true}, {packet, 2}]) of {ok, Sock} -> {ok, Hello} = associate_request(), + io:format("Hello: ~p~n", [Hello]), gen_tcp:send(Sock, [Hello]), loop(Sock); {error, Reason} -> {error, Reason} @@ -85,8 +86,8 @@ loop(Sock) -> %inet:setopts(Sock, [{active, once}]), io:format("loop ~p~n", [Sock]), receive - {tcp, Sock, <>} -> - io:format(">>> ~p ~p ~n", [Sock, Whatever]), + {tcp, Sock, Whatever} -> + io:format(">>> ~p ~p~n", [Sock, Whatever]), loop(Sock); {tcp_closed, Sock} -> io:format(">>> closed", []), -- cgit v1.2.3