From 9219b498a989bc860e88d636a80621d3dc4eadb2 Mon Sep 17 00:00:00 2001
From: Alois Cochard <alois.cochard@gmail.com>
Date: Tue, 3 Mar 2015 09:30:11 +0100
Subject: [PATCH] Add `Network.GRPC.Constants`.

---
 grpc-haskell.cabal             |  1 +
 src/Network/GRPC/Constants.hsc | 13 +++++++++++++
 2 files changed, 14 insertions(+)
 create mode 100644 src/Network/GRPC/Constants.hsc

diff --git a/grpc-haskell.cabal b/grpc-haskell.cabal
index 2a4685b..35e3264 100644
--- a/grpc-haskell.cabal
+++ b/grpc-haskell.cabal
@@ -19,6 +19,7 @@ cabal-version:       >=1.10
 library
   exposed-modules:
     Network.GRPC
+    Network.GRPC.Constants
     Network.GRPC.Time
   -- other-modules:       
   -- other-extensions:    
diff --git a/src/Network/GRPC/Constants.hsc b/src/Network/GRPC/Constants.hsc
new file mode 100644
index 0000000..1642fca
--- /dev/null
+++ b/src/Network/GRPC/Constants.hsc
@@ -0,0 +1,13 @@
+module Network.GRPC.Constants where
+
+#include "grpc/grpc.h"
+
+argEnableCensus = #const GRPC_ARG_ENABLE_CENSUS
+argMaxConcurrentStreams = #const GRPC_ARG_MAX_CONCURRENT_STREAMS
+argMaxMessageLength = #const GRPC_ARG_MAX_MESSAGE_LENGTH
+
+writeBufferHint :: Int
+writeBufferHint = #const GRPC_WRITE_BUFFER_HINT
+
+writeNoCompress :: Int
+writeNoCompress = #const GRPC_WRITE_NO_COMPRESS