From ef928097d1036e462a75464e624832f48f897597 Mon Sep 17 00:00:00 2001 From: James Crayne Date: Sun, 4 Nov 2018 03:56:35 -0500 Subject: DebugTag module, should have been in 5f5aa81 --- src/DebugTag.hs | 23 +++++++++++++++++++++++ 1 file changed, 23 insertions(+) create mode 100644 src/DebugTag.hs diff --git a/src/DebugTag.hs b/src/DebugTag.hs new file mode 100644 index 00000000..6a032d73 --- /dev/null +++ b/src/DebugTag.hs @@ -0,0 +1,23 @@ +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 + | 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) -- cgit v1.2.3