@@ -56,11 +56,8 @@ version =
57{-| Compiles Elm source code to JavaScript. -}
57{-| Compiles Elm source code to JavaScript. -}
58compile :: Context -> Text -> (Localizer, [Warning], Either [Error] Result)
58compile :: Context -> Text -> (Localizer, [Warning], Either [Error] Result)
59−compile context source =
59+compile (Context packageName exposed importDict interfaces) source =
61− (Context packageName exposed importDict interfaces) =
64 (Result.Result oneLocalizer warnings answer) =
61 (Result.Result oneLocalizer warnings answer) =
65 do modul <- Compile.compile packageName importDict interfaces source
62 do modul <- Compile.compile packageName importDict interfaces source
66 docs <- Result.format id (docsGen exposed modul)
63 docs <- Result.format id (docsGen exposed modul)