diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2020-07-14 19:34:20 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2020-07-14 19:34:20 -0700 |
commit | da5d16b9568b1a15583eb5e7bd2d6f413871f6da (patch) | |
tree | 0db1cc48bfbb915c246b82d85061d51fde61e085 | |
parent | 45e62384df1070ffba05cb42c9f265fbe86fdd7a (diff) | |
download | debug-me-da5d16b9568b1a15583eb5e7bd2d6f413871f6da.tar.gz |
fix type constraint: Monad -> MonadFail
-rw-r--r-- | Val.hs | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -42,7 +42,7 @@ instance FromJSON Val where b64 :: B.ByteString -> T.Text b64 = T.decodeUtf8 . B64.encode -unb64 :: Monad m => T.Text -> m B.ByteString +unb64 :: MonadFail m => T.Text -> m B.ByteString unb64 t = either (\_ -> fail "bad base64 data") return |