@@ -22,11 +22,11 @@ import qualified Data.Map as Map
2222import qualified Data.Maybe as Maybe
2323import qualified Data.Name as Name
2424import qualified Data.NonEmptyList as NE
25−import qualified Data.Utf8 as Utf8
2625
2726import qualified AST.Canonical as Can
2827import qualified Data.Index as Index
2928import qualified Elm.ModuleName as ModuleName
29+import qualified Elm.String as ES
3030import qualified Reporting.Annotation as A
3131
3232
@@ -41,8 +41,8 @@ data Pattern
4141
4242
4343data Literal
44− = Chr Utf8.String
45− | Str Utf8.String
44+ = Chr ES.String
45+ | Str ES.String
4646 | Int Int
4747 deriving (Eq)
4848