add ord insance to splitmix generator datatype master
authorCarter Tazio Schonwald <carter.schonwald@gmail.com>
Thu, 1 Mar 2018 18:51:20 +0000 (13:51 -0500)
committerCarter Tazio Schonwald <carter.schonwald@gmail.com>
Thu, 1 Mar 2018 18:51:20 +0000 (13:51 -0500)
src/System/Random/SplitMix/Internal.hs

index c40e451..b6b9a79 100644 (file)
@@ -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