diff options
author | Alexander Foremny <aforemny@posteo.de> | 2023-10-20 09:55:13 +0200 |
---|---|---|
committer | Alexander Foremny <aforemny@posteo.de> | 2023-11-07 09:50:52 +0100 |
commit | eafbd88429a80f058efaa4efd28fbfb8271065c3 (patch) | |
tree | 35ae08955e34014fa6666bab26807a42fbbbbcee /app/Exception.hs | |
parent | ea1236f2cf6d3ef4b739b2ca28f47a3bbed42295 (diff) |
record both creation and update in provenance
Diffstat (limited to 'app/Exception.hs')
-rw-r--r-- | app/Exception.hs | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/app/Exception.hs b/app/Exception.hs index 83d624d..ddaef5a 100644 --- a/app/Exception.hs +++ b/app/Exception.hs @@ -1,6 +1,7 @@ module Exception ( AnyException (..), InvalidTreeGrepperResult (..), + NoCommits (..), ProcessException (..), UnknownFileExtension (..), ) @@ -12,6 +13,7 @@ import System.Exit (ExitCode) data AnyException = InvalidTreeGrepperResult' InvalidTreeGrepperResult + | NoCommits' NoCommits | ProcessException' ProcessException | UnknownFileExtension' UnknownFileExtension deriving (Show) @@ -25,6 +27,11 @@ data InvalidTreeGrepperResult = InvalidTreeGrepperResult instance Exception InvalidTreeGrepperResult +data NoCommits = NoCommits + deriving (Show) + +instance Exception NoCommits + data ProcessException = ProcessException String ExitCode LB.ByteString deriving (Show) |