commit 6748993dcbd7e1b1a3cdce3b0cb3b80d24dd4a24
author Jens Geyer <jensg@apache.org> Tue Oct 27 01:44:43 2015 +0200
committer Jens Geyer <jensg@apache.org> Tue Oct 27 02:23:09 2015 +0200
tree ffc10bba9c6681a6290d0573b0ed570c9c7d03b3
parent bc464c4ce8c1048eed3b862cb885bb25386fdc28

THRIFT-3394 compiler generates uncompilable code
Client: Haskell
Patch: Tom Lippincott & Jens Geyer

Modified version of Toms patch

compiler/cpp/src/generate/t_hs_generator.cc

diff --git a/compiler/cpp/src/generate/t_hs_generator.cc b/compiler/cpp/src/generate/t_hs_generator.cc
index 99749b5..d2867ea 100644
--- a/compiler/cpp/src/generate/t_hs_generator.cc
+++ b/compiler/cpp/src/generate/t_hs_generator.cc
@@ -383,14 +383,14 @@
     case t_base_type::TYPE_I16:
     case t_base_type::TYPE_I32:
     case t_base_type::TYPE_I64:
-      out << value->get_integer();
+      out << "(" << value->get_integer() << ")";
       break;
 
     case t_base_type::TYPE_DOUBLE:
       if (value->get_type() == t_const_value::CV_INTEGER) {
-        out << value->get_integer();
+        out << "(" << value->get_integer() << ")";
       } else {
-        out << value->get_double();
+        out << "(" << value->get_double() << ")";
       }
       break;