diff options
Diffstat (limited to 'app/Exception.hs')
-rw-r--r-- | app/Exception.hs | 14 |
1 files changed, 13 insertions, 1 deletions
diff --git a/app/Exception.hs b/app/Exception.hs index d67a8bc..0cccf5b 100644 --- a/app/Exception.hs +++ b/app/Exception.hs @@ -1,11 +1,23 @@ module Exception - ( DuplicateField (DuplicateField), + ( DecodeException (DecodeException), + DuplicateField (DuplicateField), + ParseError (ParseError), ) where import Control.Exception (Exception) +data DecodeException = DecodeException + deriving (Show) + +instance Exception DecodeException + data DuplicateField = DuplicateField String deriving (Show) instance Exception DuplicateField + +data ParseError = ParseError String + deriving (Show) + +instance Exception ParseError |