Fix bug in inferred Binary type for decodeFileOrFail in IO.readBinary
commite7ca69f42b92e7e17b74870bbdffebc9cfc33220
authorEvan Czaplicki <evancz@users.noreply.github.com>
dateSat 29 Dec 2018, 10:16 (8 years ago)
parentfe41b26
builder/src/File/IO.hs+2−5
@@ -49,11 +49,8 @@ readBinary path =
4949 else
5050 do result <- Binary.decodeFileOrFail path
5151 case result of
52− Left _ ->
53− return Nothing
54−
55− Right value ->
56− return value
52+ Left _ -> return Nothing
53+ Right a -> return (Just a)
5754
5855
5956