on master help sign in
cosmetic: use more modern style for data records
4a978ebEvan Czaplicki
src/Elm/Docs.hs+8−4
@@ -23,7 +23,8 @@ import qualified Reporting.Annotation as A
23-- DATA STRUCTURES
23-- DATA STRUCTURES
24
24
25
25
26−data Documentation = Documentation
26+data Documentation =
27+ Documentation
27 { moduleName :: Module.Raw
28 { moduleName :: Module.Raw
28 , comment :: Text
29 , comment :: Text
29 , aliases :: [Alias]
30 , aliases :: [Alias]
@@ -33,7 +34,8 @@ data Documentation = Documentation
33 }
34 }
34
35
35
36
36−data Alias = Alias
37+data Alias =
38+ Alias
37 { aliasName :: Text
39 { aliasName :: Text
38 , aliasComment :: Text
40 , aliasComment :: Text
39 , aliasArgs :: [Text]
41 , aliasArgs :: [Text]
@@ -41,7 +43,8 @@ data Alias = Alias
41 }
43 }
42
44
43
45
44−data Union = Union
46+data Union =
47+ Union
45 { unionName :: Text
48 { unionName :: Text
46 , unionComment :: Text
49 , unionComment :: Text
47 , unionArgs :: [Text]
50 , unionArgs :: [Text]
@@ -49,7 +52,8 @@ data Union = Union
49 }
52 }
50
53
51
54
52−data Value = Value
55+data Value =
56+ Value
53 { valueName :: Text
57 { valueName :: Text
54 , valueComment :: Text
58 , valueComment :: Text
55 , valueType :: Type.Type
59 , valueType :: Type.Type