[require less monads in fuse
Helmut Grohne <grohne@cs.uni-bonn.de>**20150309135328
 Ignore-this: 48ef64ba7f2ce211f85689bc8d813916
 
 This saves 1% calls to Logger's >>= as a lift can be pulled out of a mapM.
] hunk ./src/Igor2/Data/IOData.hs 16
-import Syntax (Name, mkName)
+import Syntax (Name, mkName, C)
hunk ./src/Igor2/Data/IOData.hs 35
+import Control.Monad.Error (Error, MonadError)
hunk ./src/Igor2/Data/IOData.hs 153
-fuse :: [CovrRule] -> LM CovrRule
+fuse :: (MonadError e m, Error e) => [CovrRule] -> C m CovrRule
hunk ./src/Igor2/Data/IOData.hs 155
-    rule <- lift $ lggRules rules
+    rule <- lggRules rules
hunk ./src/Igor2/RuleDevelopment/Partition.hs 28
-    fusedrest    <- lift $ fuse rest
+    fusedrest    <- lift . lift $ fuse rest
hunk ./src/Igor2/RuleDevelopment/Partition.hs 66
-fuseParts = lift . mapM (liftM covrRules . mapM fuse)
+fuseParts = lift . lift . mapM (liftM covrRules . mapM fuse)