github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-12-24 15:35:14 +03:00
Code Issues Projects Releases Wiki Activity

Test null on both sides in JSON payload

Browse Source
This commit is contained in:
Timothy Clem 2017-12-11 12:59:14 -08:00
parent 2f6c669899
commit 47ce5a63c1
2 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
test/Semantic/IO/Spec.hs
View File

@ -64,6 +64,10 @@ spec = parallel $ do
h <- openFile "test/fixtures/input/diff-no-language.json" ReadMode
readBlobsFromHandle h `shouldThrow` (== ExitFailure 1)
it "throws if null on before and after" $ do
h <- openFile "test/fixtures/input/diff-null-both-sides.json" ReadMode
readBlobPairsFromHandle h `shouldThrow` (== ExitFailure 1)
describe "readBlobsFromHandle" $ do
it "returns blobs for valid JSON encoded parse input" $ do
h <- openFile "test/fixtures/input/parse.json" ReadMode

6
test/fixtures/input/diff-null-both-sides.json vendored Normal file
View File

@ -0,0 +1,6 @@
{
"blobs": [{
"before": null,
"after": null
}]
}