Cabal/src/Distribution/Verbosity/Internal.hs

   1 {-# LANGUAGE DeriveDataTypeable #-}
   2 {-# LANGUAGE DeriveGeneric #-}
   3
   4 module Distribution.Verbosity.Internal
   5   ( VerbosityLevel (..)
   6   , VerbosityFlag (..)
   7   ) where
   8
   9 import Distribution.Compat.Prelude
  10 import Prelude ()
  11
  12 data VerbosityLevel = Silent | Normal | Verbose | Deafening
  13   deriving (Generic, Show, Read, Eq, Ord, Enum, Bounded, Typeable)
  14
  15 instance Binary VerbosityLevel
  16 instance Structured VerbosityLevel
  17
  18 data VerbosityFlag
  19   = VCallStack
  20   | VCallSite
  21   | VNoWrap
  22   | VMarkOutput
  23   | VTimestamp
  24   | -- | @since 3.4.0.0
  25     VStderr
  26   | VNoWarn
  27   deriving (Generic, Show, Read, Eq, Ord, Enum, Bounded, Typeable)
  28
  29 instance Binary VerbosityFlag
  30 instance Structured VerbosityFlag