module DebugTag where

import Data.Typeable

-- | Debug Tags, add more as needed, but ensure XAnnounce is always first, XMisc last
data DebugTag
  = XAnnounce
  | XBitTorrent
  | XDHT
  | XLan
  | XMan
  | XNetCrypto
  | XNetCryptoOut
  | XOnion
  | XRoutes
  | XPing
  | XRefresh
  | XJabber
  | XTCP
  | XMisc
  | XNodeinfoSearch
  | XUnexpected -- Used only for special anomalous errors that we didn't expect to happen.
  | XUnused     -- Never commit code that uses XUnused.
  deriving (Eq, Ord, Show, Read, Enum, Bounded,Typeable)