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