Enum, Bounded instances for Priority

Addresses #13
haskell-hvr · May 16, 2015 · aa5d05c · aa5d05c
1 parent 1d91d8e
commit aa5d05c
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/System/Log.hs b/src/System/Log.hs
@@ -44,7 +44,7 @@ data Priority =
           | CRITICAL                -- ^ Severe situations
           | ALERT                   -- ^ Take immediate action
           | EMERGENCY               -- ^ System is unusable
-                    deriving (Eq, Ord, Show, Read)
+                    deriving (Eq, Ord, Enum, Bounded, Show, Read)
 
 {- | Internal type of log records -}