jakalx/annotator
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix all found hlint hints

Browse source
This commit is contained in:
Alexander Kobjolke 2023-01-06 15:17:10 +01:00
parent c9b6ad7427
commit c70ce7c1d8
3 changed files with 45 additions and 53 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/Annotator/Util.hs
View file

@ -1,4 +1,4 @@
module Annotator.Util where
anyp :: [a -> Bool] -> a -> Bool
anyp preds x = or (map ($ x) preds)
anyp preds x = any ($ x) preds