mirror of
https://github.com/roc-lang/roc.git
synced 2025-12-04 00:55:00 +00:00
roc format
This commit is contained in:
parent
2241b173bf
commit
dd0fdd5d74
2 changed files with 19 additions and 17 deletions
|
|
@ -444,10 +444,12 @@ decodeList = \decodeElem -> Decode.custom \bytes, @Json {} ->
|
||||||
when bytesWithoutWhitespace is
|
when bytesWithoutWhitespace is
|
||||||
[']', ..] ->
|
[']', ..] ->
|
||||||
{ result: Ok [], rest: List.dropFirst bytesWithoutWhitespace }
|
{ result: Ok [], rest: List.dropFirst bytesWithoutWhitespace }
|
||||||
|
|
||||||
_ ->
|
_ ->
|
||||||
when decodeElems bytesWithoutWhitespace [] is
|
when decodeElems bytesWithoutWhitespace [] is
|
||||||
Errored e rest ->
|
Errored e rest ->
|
||||||
{ result: Err e, rest }
|
{ result: Err e, rest }
|
||||||
|
|
||||||
Done vals rest ->
|
Done vals rest ->
|
||||||
when rest is
|
when rest is
|
||||||
[']', ..] -> { result: Ok vals, rest: List.dropFirst rest }
|
[']', ..] -> { result: Ok vals, rest: List.dropFirst rest }
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue