github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2025-01-02 04:10:29 +03:00
Code Issues Projects Releases Wiki Activity

Constrain roundtrip test to Literal.Null and Statements

Browse Source
This commit is contained in:
joshvera 2018-06-20 13:42:23 -04:00
parent 7084b7f7ed
commit 18caa4b2c8
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
test/Proto3/Roundtrip.hs
View File

@ -61,7 +61,7 @@ spec = parallel $ do
describe "statements" $
prop "roundtrips" $
\sp -> shouldRoundtrip' @Statement.Statements @(Term (Sum Syntax) ()) (unListableF sp)
\sp -> shouldRoundtrip @(Term (Sum '[Statement.Statements, Literal.Null]) ()) (unListableF sp)
describe "blobs" $ do
it "should roundtrip given a Message instance" $ do