1
1
mirror of https://github.com/github/semantic.git synced 2024-12-01 09:15:01 +03:00

Fix a test case which fails at the end of input.

This commit is contained in:
Rob Rix 2017-08-04 08:52:08 -04:00
parent 9e1aad5032
commit 71642ae1bd

View File

@ -184,7 +184,7 @@ spec = do
(symbol Palette *> children ( many (red `catchError` const blue) ))
(makeState [node Palette 0 1 [node Green 1 2 []]])
`shouldBe`
None (Error (Info.Pos 1 2) [Blue] (Just Green))
None (Error (Info.Pos 1 2) [] (Just Green))
it "handler that always matches with apply consumes and then errors" $
runAssignment headF "PG"