Quickcheck for ggs_network. Part of the pongbot.

This commit is contained in:
Kallfaktorn 2011-05-11 09:10:07 +02:00
parent e6ff8b6f16
commit 9efd739cbb
8 changed files with 381 additions and 3 deletions

View file

@ -2,10 +2,12 @@
-export([connect/0,append_key_value_strings_to_dict/2,key_value_string_to_list/1]).
-export([read/2, send_command/3]).
%For quickcheck
-export([receive_content/1,receive_data/3]).
connect() ->
%{ok,Socket} = gen_tcp:connect("ggs.jeena.net", 9000,[{active, false}]),
{ok,Socket} = gen_tcp:connect("localhost", 9000,[{active, false}]),
Socket.
{ok,Socket} = gen_tcp:connect("localhost", 9000,[{active, false}]).
read(Socket, Ref) ->
Content = receive_content(Socket),