We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 030f51e commit 4377eb1Copy full SHA for 4377eb1
src/Data/Thyme/Format/DateFast.hs
@@ -113,7 +113,7 @@ parserRfc = do
113
tday = fromGregorian year month dayofmonth
114
return $ view (from utcTime) (UTCView tday tdiff)
115
116
-parseFastUtc :: Monad m => T.Text -> m UTCTime
+parseFastUtc :: MonadFail m => T.Text -> m UTCTime
117
parseFastUtc t =
118
case S.scanOnly parserRfc (encodeUtf8 t) of
119
Right d -> return d
0 commit comments