THRIFT-192. erlang: Commit test code missed in r757870
authorDavid Reiss <dreiss@apache.org>
Mon, 30 Mar 2009 20:46:52 +0000 (20:46 +0000)
committerDavid Reiss <dreiss@apache.org>
Mon, 30 Mar 2009 20:46:52 +0000 (20:46 +0000)
git-svn-id: https://svn.apache.org/repos/asf/incubator/thrift/trunk@760163 13f79535-47bb-0310-9956-ffa450edef68

test/erl/src/test_membuffer.erl

index fdcdc82..66f7f6c 100644 (file)
@@ -40,7 +40,23 @@ t2() ->
                       i64_thing = TestData#xtruct.i64_thing}.
 
 
+t3() ->
+    {ok, Transport} = thrift_memory_buffer:new(),
+    {ok, Protocol} = thrift_binary_protocol:new(Transport),
+    TestData = #bools{im_true = true, im_false = false},
+    ok = thrift_protocol:write(Protocol,
+                              {{struct, element(2, thriftTest_types:struct_info('bools'))},
+                               TestData}),
+    {ok, Result} = thrift_protocol:read(Protocol,
+                                       {struct, element(2, thriftTest_types:struct_info('bools'))},
+                                       'bools'),
+
+    true = TestData#bools.im_true  =:= Result#bools.im_true,
+    true = TestData#bools.im_false =:= Result#bools.im_false.
+
+
 t() ->
     t1(),
-    t2().
+    t2(),
+    t3().