From 22a2a16bd62edd553b4f7f2e9eedc26cbf8850d8 Mon Sep 17 00:00:00 2001
From: Carter Tazio Schonwald <carter.schonwald@gmail.com>
Date: Thu, 1 Mar 2018 13:51:20 -0500
Subject: [PATCH] add ord insance to splitmix generator datatype
---
src/System/Random/SplitMix/Internal.hs | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/System/Random/SplitMix/Internal.hs b/src/System/Random/SplitMix/Internal.hs
index c40e4519..b6b9a79e 100644
--- a/src/System/Random/SplitMix/Internal.hs
+++ b/src/System/Random/SplitMix/Internal.hs
@@ -90,7 +90,7 @@ type SplitMix64 = (# Word64# , Word64# #)
data SplitMix64 = SplitMix64 { sm64seed :: {-# UNPACK #-} !Word64
,sm64Gamma :: {-# UNPACK #-} !Word64 }
- deriving (Eq,Read,Show,Data,Typeable)
+ deriving (Eq,Ord,Read,Show,Data,Typeable)
advanceSplitMix :: SplitMix64 -> SplitMix64
--
GitLab