language-servers/roc
1
0
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2025-08-01 10:52:18 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 6

Add Decode.mapResult

Browse source
This commit is contained in:
Ayaz Hafiz 2022-10-18 14:39:35 -05:00
parent bb8888b115
commit e08b613047
No known key found for this signature in database
GPG key ID: 0E2A37416A25EF58
2 changed files with 5 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

4
crates/compiler/builtins/roc/Decode.roc
View file

@ -27,6 +27,7 @@ interface Decode
decodeWith,
fromBytesPartial,
fromBytes,
mapResult,
]
imports [
List,
@ -96,3 +97,6 @@ fromBytes = \bytes, fmt ->
Err TooShort -> Err TooShort
else
Err (Leftover rest)
mapResult : DecodeResult a, (a -> b) -> DecodeResult b
mapResult = \{result, rest}, mapper -> {result: Result.map result mapper, rest}