[erl] fix test_server to expect binary type for strings rather than lists
git-svn-id: https://svn.apache.org/repos/asf/incubator/thrift/trunk@666484 13f79535-47bb-0310-9956-ffa450edef68
diff --git a/test/erl/src/test_server.erl b/test/erl/src/test_server.erl
index d44e902..9493813 100644
--- a/test/erl/src/test_server.erl
+++ b/test/erl/src/test_server.erl
@@ -12,7 +12,7 @@
io:format("testVoid~n"),
ok;
-handle_function(testString, {S}) when is_list(S) ->
+handle_function(testString, {S}) when is_binary(S) ->
io:format("testString: ~p~n", [S]),
{reply, S};
@@ -37,7 +37,7 @@
byte_thing = Byte,
i32_thing = I32,
i64_thing = I64}})
-when is_list(String),
+when is_binary(String),
is_integer(Byte),
is_integer(I32),
is_integer(I64) ->
@@ -126,7 +126,7 @@
i32_thing = Arg1,
i64_thing = Arg2}};
-handle_function(testException, {String}) when is_list(String) ->
+handle_function(testException, {String}) when is_binary(String) ->
io:format("testException(~p)~n", [String]),
case String of
"Xception" ->