From 4f7b95c02e7b2d9d79358c2241510c4c192ec582 Mon Sep 17 00:00:00 2001 From: Dimitri Sokolyuk Date: Sat, 24 Oct 2015 03:05:55 +0200 Subject: Spawn and timeout on connect --- tda.erl | 5 +++-- 1 file 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. -- cgit v1.2.3