git.iko.soy/typeable/pandoc
on master help sign in
Free: Add Typeable instance to PandocActionError
f404412Jesse Rosenthal
src/Text/Pandoc/Free.hs+3−2
compare with master
unifiedsplit
@@ -1,4 +1,4 @@
1−{-# LANGUAGE DeriveFunctor #-}
1+{-# LANGUAGE DeriveFunctor, DeriveDataTypeable #-}
2
2
3{-
3{-
4Copyright (C) 2016 Jesse Rosenthal <jrosenthal@jhu.edu>
4Copyright (C) 2016 Jesse Rosenthal <jrosenthal@jhu.edu>
@@ -90,6 +90,7 @@ import qualified System.FilePath.Glob as IO (glob)
90import Control.Monad.State hiding (fail)
90import Control.Monad.State hiding (fail)
91import Control.Monad.Reader hiding (fail)
91import Control.Monad.Reader hiding (fail)
92import Data.Word (Word8)
92import Data.Word (Word8)
93+import Data.Typeable
93
94
94data PandocActionF nxt =
95data PandocActionF nxt =
95 LookupEnv String (Maybe String -> nxt)
96 LookupEnv String (Maybe String -> nxt)
@@ -219,7 +220,7 @@ data TestEnv = TestEnv { envEnv :: [(String, String)]
219 }
220 }
220
221
221data TestException = TestException
222data TestException = TestException
222− deriving (Show)
223+ deriving (Show, Typeable)
223
224
224instance E.Exception TestException
225instance E.Exception TestException
225
226