From 32c76fb1f411896a4727ba2a76cdfc9dcd3dc48a Mon Sep 17 00:00:00 2001 From: Alexander Foremny Date: Sun, 3 Dec 2023 13:29:00 +0100 Subject: feat: color patches --- app/Exception.hs | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'app/Exception.hs') diff --git a/app/Exception.hs b/app/Exception.hs index ddaef5a..49c9cb6 100644 --- a/app/Exception.hs +++ b/app/Exception.hs @@ -4,6 +4,7 @@ module Exception NoCommits (..), ProcessException (..), UnknownFileExtension (..), + InvalidDiff (..), ) where @@ -16,6 +17,7 @@ data AnyException | NoCommits' NoCommits | ProcessException' ProcessException | UnknownFileExtension' UnknownFileExtension + | InvalidDiff' InvalidDiff deriving (Show) instance Exception AnyException @@ -43,3 +45,8 @@ data UnknownFileExtension = UnknownFileExtension deriving (Show) instance Exception UnknownFileExtension + +data InvalidDiff = InvalidDiff String + deriving (Show) + +instance Exception InvalidDiff -- cgit v1.2.3