From bbe3b75bfd0767c61bcd436e843b9c785efd289f Mon Sep 17 00:00:00 2001 From: Alexander Foremny Date: Mon, 19 Feb 2024 04:55:36 +0100 Subject: support `INSERT`, `DELETE`, `UPDATE` --- src/Store/Exception.hs | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'src/Store/Exception.hs') diff --git a/src/Store/Exception.hs b/src/Store/Exception.hs index 245780c..94beaab 100644 --- a/src/Store/Exception.hs +++ b/src/Store/Exception.hs @@ -2,10 +2,12 @@ module Store.Exception ( DecodeException (DecodeException), DuplicateField (DuplicateField), ParseError (ParseError), + MissingFileName (MissingFileName), ) where import Control.Exception (Exception) +import Data.Aeson qualified as J data DecodeException = DecodeException deriving (Show) @@ -21,3 +23,8 @@ data ParseError = ParseError String deriving (Show) instance Exception ParseError + +data MissingFileName = MissingFileName J.Value + deriving (Show) + +instance Exception MissingFileName -- cgit v1.2.3