git.iko.soy/elk
on master help sign in
Upgrade Compile function to take text, not strings
5698054Evan Czaplicki
src/Compile.hs+6−1
compare with master
unifiedsplit
@@ -1,6 +1,8 @@
1{-# OPTIONS_GHC -Wall -fno-warn-unused-do-bind #-}
1{-# OPTIONS_GHC -Wall -fno-warn-unused-do-bind #-}
2module Compile (compile) where
2module Compile (compile) where
3
3
4+import Data.Text (Text)
5+
4import qualified AST.Expression.Canonical as Can
6import qualified AST.Expression.Canonical as Can
5import qualified AST.Module as Module
7import qualified AST.Module as Module
6import qualified AST.Module.Name as ModuleName
8import qualified AST.Module.Name as ModuleName
@@ -18,6 +20,9 @@ import qualified Type.Inference as TI
18
20
19
21
20
22
23+-- COMPILE
24+
25+
21type Result =
26type Result =
22 Result.Result (Result.One RenderType.Localizer) Warning.Warning Error.Error
27 Result.Result (Result.One RenderType.Localizer) Warning.Warning Error.Error
23
28
@@ -26,7 +31,7 @@ compile
26 :: Package.Name
31 :: Package.Name
27 -> [ModuleName.Canonical]
32 -> [ModuleName.Canonical]
28 -> Module.Interfaces
33 -> Module.Interfaces
29− -> String
34+ -> Text
30 -> Result Module.Optimized
35 -> Result Module.Optimized
31compile packageName canonicalImports interfaces source =
36compile packageName canonicalImports interfaces source =
32 do
37 do