fraport/fradrive
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

refactor: fix hlint

Browse Source
This commit is contained in:
Gregor Kleen 2019-07-23 09:51:41 +02:00
parent 68a54470c9
commit b4b55da61f
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/Database/Esqueleto/Utils.hs
View File

@ -62,8 +62,8 @@ hasInfix :: ( E.Esqueleto query expr backend
hasInfix = flip isInfixOf
and, or :: Foldable f => f (E.SqlExpr (E.Value Bool)) -> E.SqlExpr (E.Value Bool)
and = F.foldr (\b acc -> acc E.&&. b) true
or = F.foldr (\b acc -> acc E.||. b) false
and = F.foldr (E.&&.) true
or = F.foldr (E.||.) false
-- | Given a test and a set of values, check whether anyone succeeds the test
-- WARNING: SQL leaves it explicitely unspecified whether `||` is short curcuited (i.e. lazily evaluated)