summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDimitri Sokolyuk <demon@dim13.org>2015-10-24 03:05:55 +0200
committerDimitri Sokolyuk <demon@dim13.org>2015-10-24 03:05:55 +0200
commit4f7b95c02e7b2d9d79358c2241510c4c192ec582 (patch)
tree7da82a5f555e5e8a0200a7a4cda3f13ca589296a
parent359513452f4078cf6348602044567d7fcdeaa832 (diff)
Spawn and timeout on connect
-rw-r--r--tda.erl5
1 files changed, 3 insertions, 2 deletions
diff --git a/tda.erl b/tda.erl
index f4e4f8b..027c3b3 100644
--- a/tda.erl
+++ b/tda.erl
@@ -91,12 +91,13 @@ start_client() ->
client() ->
Host = "192.168.240.20",
- case gen_tcp:connect(Host, 33333, [binary, {active, true}, {packet, 2}]) of
+ case gen_tcp:connect(Host, 33333, [binary, {active, true}, {packet, 2}],
+ 3000) of
{ok, Sock} ->
{ok, Hello} = associate_request(),
io:format("Hello: ~p~n", [Hello]),
gen_tcp:send(Sock, Hello),
- loop(Sock);
+ spawn(?MODULE, loop, [Sock]);
{error, Reason} -> {error, Reason}
end.