diff --git a/src/Hash2Pub/FediChord.hs b/src/Hash2Pub/FediChord.hs index ca87945..fd26b6f 100644 --- a/src/Hash2Pub/FediChord.hs +++ b/src/Hash2Pub/FediChord.hs @@ -1,4 +1,5 @@ {-# LANGUAGE DataKinds #-} +{-# LANGUAGE DerivingStrategies #-} {-# LANGUAGE GeneralizedNewtypeDeriving #-} {-# LANGUAGE OverloadedStrings #-} {- | @@ -84,7 +85,7 @@ idBits = 256 -- -- for being able to check value bounds, the constructor should not be used directly -- and new values are created via @toNodeID@ (newtype constructors cannot be hidden) -newtype NodeID = NodeID { getNodeID :: Integer } deriving (Eq, Show, Enum) +newtype NodeID = NodeID { getNodeID :: Integer } deriving stock (Show, Eq) deriving newtype Enum -- |smart data constructor for NodeID that throws a runtime exception for out-of-bounds values. -- When needing a runtime-safe constructor with drawbacks, try @fromInteger@