From d80a4995822c5e6076497c0a1df98c0a94525568 Mon Sep 17 00:00:00 2001
From: Vincent Hanquez <vincent@snarc.org>
Date: Thu, 4 Feb 2016 07:28:42 +0000
Subject: [PATCH] removed bounded names for useless parameter

---
 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 0fee70b..ffc1f30 100644
--- a/Crypto/Number/Compat.hs
+++ b/Crypto/Number/Compat.hs
@@ -71,7 +71,7 @@ gmpLog2 _ = GmpUnsupported
 -- time wise through GMP
 gmpPowModSecInteger :: Integer -> Integer -> Integer -> GmpSupported Integer
 #if MIN_VERSION_integer_gmp(1,0,0)
-gmpPowModSecInteger b e m = GmpUnsupported
+gmpPowModSecInteger _ _ _ = GmpUnsupported
 #elif MIN_VERSION_integer_gmp(0,5,1)
 gmpPowModSecInteger b e m = GmpSupported (powModSecInteger b e m)
 #else