From 8c07305deb35cd9c6674726d8d0666a3d2c1f20e Mon Sep 17 00:00:00 2001
From: Vincent Hanquez <vincent@snarc.org>
Date: Mon, 11 May 2015 07:31:52 +0100
Subject: [PATCH] [number] fix compat with a missing do.

---
 Crypto/Number/Compat.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Crypto/Number/Compat.hs b/Crypto/Number/Compat.hs
index f2b3de8..3909167 100644
--- a/Crypto/Number/Compat.hs
+++ b/Crypto/Number/Compat.hs
@@ -114,7 +114,7 @@ gmpSizeInBytes _ = GmpUnsupported
 
 gmpExportInteger :: Integer -> Ptr Word8 -> GmpSupported (IO ())
 #if __GLASGOW_HASKELL__ >= 710
-gmpExportInteger n (Ptr addr) = GmpSupported $
+gmpExportInteger n (Ptr addr) = GmpSupported $ do
     _ <- exportIntegerToAddr n addr 1#
     return ()
 #elif MIN_VERSION_integer_gmp(0,5,1)