add ord insance to splitmix generator datatype

haskell · Mar 1, 2018 · 22a2a16 · 22a2a16
1 parent c6c3ed7
commit 22a2a16
Showing 1 changed file with 1 addition and 1 deletion.
diff --git 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