diff options
Diffstat (limited to 'src/Data/JLD/Compaction/Global.hs')
-rw-r--r-- | src/Data/JLD/Compaction/Global.hs | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/src/Data/JLD/Compaction/Global.hs b/src/Data/JLD/Compaction/Global.hs new file mode 100644 index 0000000..76b2db7 --- /dev/null +++ b/src/Data/JLD/Compaction/Global.hs | |||
@@ -0,0 +1,13 @@ | |||
1 | module Data.JLD.Compaction.Global (JLDCompactionT, JLDCompactionEnv (..)) where | ||
2 | |||
3 | import Data.JLD.Prelude | ||
4 | |||
5 | import Data.JLD.Error (JLDError) | ||
6 | import Data.JLD.Options (JLDVersion (..)) | ||
7 | |||
8 | type JLDCompactionT e m = ReaderT JLDCompactionEnv (ExceptT (JLDError e) m) | ||
9 | |||
10 | newtype JLDCompactionEnv = JLDCompactionEnv | ||
11 | { jldCompactionEnvProcessingMode :: JLDVersion | ||
12 | } | ||
13 | deriving (Show) | ||