language-servers/roc
1
0
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2025-09-26 13:29:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 6

Don't use backpassing on List.any

Browse source
This commit is contained in:
Richard Feldman 2022-11-03 23:16:28 -04:00
parent d382eb334f
commit ee9b62d8ae
No known key found for this signature in database
GPG key ID: F1F21AA5B1D9E43B
1 changed files with 1 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

3
crates/compiler/builtins/roc/Dict.roc
View file

@ -226,8 +226,7 @@ expect update (single "a" Bool.true) "a" alterValue == empty
## |> Bool.isEq Bool.true
contains : Dict k v, k -> Bool | k has Eq
contains = \@Dict list, needle ->
(Pair key _value) <- List.any list
key == needle
List.any list \Pair key _val -> key == needle
expect contains empty "a" == Bool.false
expect contains (single "a" {}) "a" == Bool.true