on master help sign in
Move Transform.Declaration into Canonicalize/ directory
4fdad11Evan Czaplicki
src/Canonicalize.hs+2−2
@@ -23,6 +23,7 @@ import qualified Reporting.Error as Error
23import qualified Reporting.Error.Canonicalize as CError
23import qualified Reporting.Error.Canonicalize as CError
24import qualified Reporting.Result as R
24import qualified Reporting.Result as R
25import qualified Reporting.Warning as Warning
25import qualified Reporting.Warning as Warning
26+import qualified Canonicalize.Declaration as Decls
26import qualified Canonicalize.Environment as Env
27import qualified Canonicalize.Environment as Env
27import qualified Canonicalize.Port as Port
28import qualified Canonicalize.Port as Port
28import qualified Canonicalize.Result as Result
29import qualified Canonicalize.Result as Result
@@ -30,7 +31,6 @@ import qualified Canonicalize.Setup as Setup
30import qualified Canonicalize.Sort as Sort
31import qualified Canonicalize.Sort as Sort
31import qualified Canonicalize.Type as Canonicalize
32import qualified Canonicalize.Type as Canonicalize
32import qualified Canonicalize.Variable as Canonicalize
33import qualified Canonicalize.Variable as Canonicalize
33−import qualified Transform.Declaration as Transform
34
34
35
35
36-- MODULES
36-- MODULES
@@ -85,7 +85,7 @@ moduleHelp interfaces modul@(Module.Module _ _ exports (defaults, imports) decls
85 in
85 in
86 Module.CanonicalBody
86 Module.CanonicalBody
87 { program =
87 { program =
88− let expr = Transform.toExpr (Module.names modul) decls
88+ let expr = Decls.toExpr (Module.names modul) decls
89 in
89 in
90 Sort.definitions (dummyLet expr)
90 Sort.definitions (dummyLet expr)
91
91
src/Transform/Declaration.hs → src/Canonicalize/Declaration.hsrenamed+1−1
@@ -1,5 +1,5 @@
1{-# OPTIONS_GHC -Wall #-}
1{-# OPTIONS_GHC -Wall #-}
2−module Transform.Declaration (toExpr) where
2+module Canonicalize.Declaration (toExpr) where
3
3
4import qualified AST.Declaration as D
4import qualified AST.Declaration as D
5import qualified AST.Expression.General as E
5import qualified AST.Expression.General as E