@@ -32,18 +32,20 @@ import qualified Reporting.Result as Result
3232import qualified Reporting.Warning as Warning
3333
3434
35+
3536-- VERSION
3637
38+
3739version :: Package.Version
3840version =
3941 Elm.Compiler.Version.version
4042
4143
44+
4245-- DEPENDENCIES
4346
44−parseDependencies
45− :: String
46− -> Either [Error] (PublicModule.Name, [PublicModule.Name])
47+
48+parseDependencies :: String -> Either [Error] (PublicModule.Name, [PublicModule.Name])
4749parseDependencies sourceCode =
4850 let
4951 (Result.Result _warnings rawResult) =
@@ -60,8 +62,10 @@ parseDependencies sourceCode =
6062 )
6163
6264
65+
6366-- COMPILATION
6467
68+
6569{-| Compiles Elm source code to JavaScript. -}
6670compile
6771 :: Context
@@ -125,8 +129,10 @@ docsGen isExposed (Module.Module name _ info) =
125129 (Just . toDocs) `fmap` Result.mapError Error.Docs getChecked
126130
127131
132+
128133-- DEALIASER
129134
135+
130136newtype Localizer =
131137 Localizer RenderType.Localizer
132138
@@ -136,8 +142,10 @@ dummyLocalizer =
136142 Localizer Map.empty
137143
138144
145+
139146-- ERRORS
140147
148+
141149newtype Error =
142150 Error (A.Located Error.Error)
143151
@@ -157,8 +165,10 @@ errorToJson (Localizer localizer) location (Error err) =
157165 Error.toJson localizer location err
158166
159167
168+
160169-- WARNINGS
161170
171+
162172newtype Warning =
163173 Warning (A.Located Warning.Warning)
164174