From: David Reiss <dreiss@apache.org>
Date: Wed, 11 Jun 2008 01:16:09 +0000 (+0000)
Subject: [erl] fix test_server to expect binary type for strings rather than lists
X-Git-Tag: 0.2.0~679
X-Git-Url: https://source.supwisdom.com/gerrit/gitweb?a=commitdiff_plain;h=a59191b5ef878f1ddb4ef9c204049bf53e39d35e;p=common%2Fthrift.git

[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 d44e9021..94938135 100644
--- a/test/erl/src/test_server.erl
+++ b/test/erl/src/test_server.erl
@@ -12,7 +12,7 @@ handle_function(testVoid, {}) ->
     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 @@ handle_function(testStruct,
                                  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 @@ handle_function(testMulti, Args = {Arg0, Arg1, Arg2, _Arg3, Arg4, Arg5})
                     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" ->