-module(elli_http_tests).
|
|
-include_lib("eunit/include/eunit.hrl").
|
|
|
|
%% UNIT TESTS
|
|
|
|
chunk_loop_test_() ->
|
|
fun() ->
|
|
Here = self(),
|
|
Pid = spawn_link(chunk_loop_wrapper(Here)),
|
|
Pid ! {tcp_closed, some_socket},
|
|
Message = receive_message(),
|
|
?assertMatch({error, client_closed}, Message)
|
|
end.
|
|
|
|
chunk_loop_wrapper(Here) ->
|
|
fun() ->
|
|
Result = wsHttp:chunk_loop({some_type, some_socket}),
|
|
Here ! Result,
|
|
ok
|
|
end.
|
|
|
|
receive_message() ->
|
|
receive
|
|
X -> X
|
|
after
|
|
1 -> fail
|
|
end.
|