yaml 0.7.0.3 → 0.7.0.4
raw patch · 3 files changed
+7/−1 lines, 3 files
Files
- Text/Libyaml.hs +1/−0
- test/main.hs +5/−0
- yaml.cabal +1/−1
Text/Libyaml.hs view
@@ -453,6 +453,7 @@ instance Exception ToEventRawException decode :: C.MonadResource m => B.ByteString -> C.Source m Event+decode bs | B8.null bs = return () decode bs = C.sourceIO alloc cleanup (runParser . fst) where
test/main.hs view
@@ -61,6 +61,8 @@ it "parses when all lowercase" caseLowercaseBool it "parses when all uppercase" caseUppercaseBool it "parses when titlecase" caseTitlecaseBool+ describe "empty input" $ do+ it "doesn't crash" caseEmptyInput counter :: Monad m => (Y.Event -> Bool) -> C.Sink Y.Event m Int counter pred' =@@ -322,3 +324,6 @@ caseLowercaseBool = D.decode "foo: off\nbar: y\nbaz: true" @?= obj caseUppercaseBool = D.decode "foo: FALSE\nbar: Y\nbaz: ON" @?= obj caseTitlecaseBool = D.decode "foo: No\nbar: Yes\nbaz: True" @?= obj++caseEmptyInput :: Assertion+caseEmptyInput = D.decode B8.empty @?= (Nothing :: Maybe D.Value)
yaml.cabal view
@@ -1,5 +1,5 @@ name: yaml-version: 0.7.0.3+version: 0.7.0.4 license: BSD3 license-file: LICENSE author: Michael Snoyman <michael@snoyman.com>, Anton Ageev <antage@gmail.com>,Kirill Simonov