From fd24980530b1b7dc07a02048421eef4861bf60dd Mon Sep 17 00:00:00 2001
From: Vincent Hanquez <vincent@snarc.org>
Date: Sat, 9 Apr 2016 13:46:06 +0100
Subject: [PATCH] [ECC] add Bounded instance to CurveName

---
 Crypto/PubKey/ECC/Types.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Crypto/PubKey/ECC/Types.hs b/Crypto/PubKey/ECC/Types.hs
index 5f693e7..4f100f9 100644
--- a/Crypto/PubKey/ECC/Types.hs
+++ b/Crypto/PubKey/ECC/Types.hs
@@ -121,7 +121,7 @@ data CurveName =
     | SEC_t409r1
     | SEC_t571k1
     | SEC_t571r1
-    deriving (Show,Read,Eq,Ord,Enum,Data,Typeable)
+    deriving (Show,Read,Eq,Ord,Enum,Bounded,Data,Typeable)
 
 {-
 curvesOIDs :: [ (CurveName, [Integer]) ]