jfmengels/elm-review
1
1
Fork 0
mirror of https://github.com/jfmengels/elm-review.git synced 2024-08-17 20:10:29 +03:00
Code Issues Packages Projects Releases Wiki Activity

Format unions

Browse Source
This commit is contained in:
Jeroen Engels 2021-03-11 23:44:47 +01:00
parent d6f6650945
commit 0e2a0941cd
1 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
create-dependency/src/DependencyCreator.elm
View File

@ -67,6 +67,14 @@ formatAlias alias_ =
}"""
formatUnion union =
"{ name = " ++ stringify union.name ++ """
, args = """ ++ listOfThings stringify union.args ++ """
, comment = """ ++ stringify union.comment ++ """
, tags = """ ++ listOfThings (\( name, types ) -> "( " ++ stringify name ++ ", " ++ listOfThings formatType types ++ ")") union.tags ++ """
}"""
formatType : Elm.Type.Type -> String
formatType type_ =
case type_ of
@ -125,7 +133,7 @@ formatModule mod =
"{ name = " ++ stringify mod.name ++ """
, comment = """ ++ stringify mod.comment ++ """
, aliases = """ ++ listOfThings formatAlias mod.aliases ++ """
, unions = []
, unions = """ ++ listOfThings formatUnion mod.unions ++ """
, binops = []
, values = []
}"""