@@ -1,4 +1,4 @@
1−module Generate.Cases (toMatch, Match (..), Clause (..), matchSubst, newVar) where
1+module Optimize.Cases (toMatch, Match (..), Clause (..), matchSubst, newVar) where
22
33import Control.Applicative ((<$>))
44import Control.Arrow (first)
@@ -12,7 +12,7 @@ import qualified AST.Expression.Optimized as Optimized
1212import qualified AST.Literal as Literal
1313import qualified AST.Pattern as P
1414import qualified AST.Variable as Var
15−import qualified Generate.Substitute as S
15+import qualified Optimize.Substitute as S
1616import qualified Reporting.Annotation as A
1717
1818