ilyakooo0/elm-bridge
1
0
Fork 0
mirror of https://github.com/ilyakooo0/elm-bridge.git synced 2024-10-05 17:47:50 +03:00
Code Issues Packages Projects Releases Wiki Activity

Fixed elm build

Browse Source
This commit is contained in:
iko 2023-08-28 15:15:33 +03:00
parent 4b0407c02e
commit 57b06b76be
Signed by untrusted user: iko
GPG Key ID: 82C257048D1026F2
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Elm/Json.hs
View File

@ -112,7 +112,7 @@ jsonParserForDef etd =
tab n s = replicate n ' ' ++ s
typename = et_name name
declLine [_] | TaggedObject tg el <- encodingType =
unwords [ "decodeSumTaggedObject", show typename, show tg, show el, dictName, isObjectSetName ]
" in " ++ unwords [ "decodeSumTaggedObject", show typename, show tg, show el, dictName, isObjectSetName ]
declLine [_] = ""
declLine _ = " in " ++ case encodingType of
ObjectWithSingleField -> unwords [ "decodeSumObjectWithSingleField ", show typename, dictName]