| commit | a649e7473bd0229f160332f0c80407ba49765065 | [log] [tgz] |
|---|---|---|
| author | Nobuaki Sukegawa <nsukeg@gmail.com> | Mon Sep 21 13:53:25 2015 +0900 |
| committer | Roger Meier <roger@apache.org> | Mon Sep 21 23:07:39 2015 +0200 |
| tree | 44dea5abd7123a132851b6e1e181bf6caf3d3a44 | |
| parent | 245c347b7374182f8142ac07e43473ddd8c4d0de [diff] [blame] |
THRIFT-3337 Add testBool method to cross tests This closes #611
diff --git a/test/perl/TestClient.pl b/test/perl/TestClient.pl index 0f1ce65..40f8f59 100755 --- a/test/perl/TestClient.pl +++ b/test/perl/TestClient.pl
@@ -133,6 +133,17 @@ print(" = \"$s\"\n"); # +# BOOL TEST +# +print("testBool(1)"); +my $u8 = $testClient->testBool(1); +print(" = $u8\n"); +print("testBool(0)"); +my $u8 = $testClient->testBool(0); +print(" = $u8\n"); + + +# # BYTE TEST # print("testByte(1)");