module HOCD.Error ( OCDError(..) ) where import Data.ByteString (ByteString) import HOCD.Types (RegisterName) data OCDError = OCDError_ReplyMissingSubOnEnd ByteString | OCDError_FailedToSetRegister RegisterName | OCDError_GetAddrInfoFailed | OCDError_ParseMemory String | OCDError_ParseRegisters String | OCDError_ExpectedOneButGotMore deriving (OCDError -> OCDError -> Bool (OCDError -> OCDError -> Bool) -> (OCDError -> OCDError -> Bool) -> Eq OCDError forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a $c== :: OCDError -> OCDError -> Bool == :: OCDError -> OCDError -> Bool $c/= :: OCDError -> OCDError -> Bool /= :: OCDError -> OCDError -> Bool Eq, Int -> OCDError -> ShowS [OCDError] -> ShowS OCDError -> String (Int -> OCDError -> ShowS) -> (OCDError -> String) -> ([OCDError] -> ShowS) -> Show OCDError forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a $cshowsPrec :: Int -> OCDError -> ShowS showsPrec :: Int -> OCDError -> ShowS $cshow :: OCDError -> String show :: OCDError -> String $cshowList :: [OCDError] -> ShowS showList :: [OCDError] -> ShowS Show)