[thrift] 02/02: THRIFT-4955 Haskell test broken due to extension to CompactProtoTestStruct Client: Haskell Patch: Jens Geyer

[je...@apache.org]

This is an automated email from the ASF dual-hosted git repository.

jensg pushed a commit to branch master
in repository https://gitbox.apache.org/repos/asf/thrift.git

commit 061eafb1fa2aa83068305cf0eb768930253e8710
Author: Jens Geyer <je...@apache.org>
AuthorDate: Sat Mar 9 21:53:12 2019 +0100

    THRIFT-4955 Haskell test broken due to extension to CompactProtoTestStruct
    Client: Haskell
    Patch: Jens Geyer
    
    This closes #1872
---
 test/hs/DebugProtoTest_Main.hs | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/test/hs/DebugProtoTest_Main.hs b/test/hs/DebugProtoTest_Main.hs
index fb28963..97d4347 100644
--- a/test/hs/DebugProtoTest_Main.hs
+++ b/test/hs/DebugProtoTest_Main.hs
@@ -117,7 +117,11 @@ instance SIface.Srv_Iface InheritedHandler where
 
             Types.compactProtoTestStruct_byte_map_map = Map.empty,
             Types.compactProtoTestStruct_byte_set_map = Map.empty,
-            Types.compactProtoTestStruct_byte_list_map = Map.empty }
+            Types.compactProtoTestStruct_byte_list_map = Map.empty,
+
+            Types.compactProtoTestStruct_field500 = 500,
+            Types.compactProtoTestStruct_field5000 = 5000,
+            Types.compactProtoTestStruct_field20000 = 20000 }
 
     methodWithDefaultArgs _ arg = do
         ThriftTestUtils.serverLog $ "Got methodWithDefaultArgs: " ++ show arg