facebook/Haxl
1
1
Fork 0
mirror of https://github.com/facebook/Haxl.git synced 2024-12-25 01:31:31 +03:00
Code Issues Projects Releases Wiki Activity

lint

Browse Source 
Summary: From PR 5 on github

Test Plan: unit tests

Reviewed By: akr@fb.com

Subscribers: ldbrandy, jonp, smarlow, akr, bnitka, jcoens

FB internal diff: D1384641
This commit is contained in:
Simon Marlow 2014-06-16 05:09:51 -07:00
parent 6ddd602873
commit e6dbb92d4b
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Haxl/Prelude.hs
View File

@ -89,7 +89,7 @@ class IfThenElse a b where
ifThenElse :: a -> b -> b -> b ifThenElse :: a -> b -> b -> b
instance IfThenElse Bool a where instance IfThenElse Bool a where
ifThenElse b t e = case b of True -> t; False -> e ifThenElse b t e = if b then t else e
-- The equality constraint is necessary to convince the typechecker that -- The equality constraint is necessary to convince the typechecker that
-- this is valid: -- this is valid: