github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2025-01-01 11:46:14 +03:00
Code Issues Projects Releases Wiki Activity

Clarify one of the test descriptions.

Browse Source
This commit is contained in:
Rob Rix 2017-05-03 11:23:31 -04:00
parent 2b9fb8552a
commit b4face5176
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/Data/Syntax/Assignment/Spec.hs
View File

@ -79,7 +79,7 @@ spec = do
Result [] (Just (AssignmentState 2 (Info.SourcePos 1 3) "" [], ["1", "2"])) Result [] (Just (AssignmentState 2 (Info.SourcePos 1 3) "" [], ["1", "2"]))
describe "runAssignment" $ do describe "runAssignment" $ do
it "drops anonymous nodes before matching" $ it "drops anonymous nodes before matching symbols" $
runAssignment red (makeState "magenta red" [Rose (rec Magenta 0 7) [], Rose (rec Red 8 11) []]) `shouldBe` Result [] (Just (AssignmentState 11 (Info.SourcePos 1 12) "" [], Out "red")) runAssignment red (makeState "magenta red" [Rose (rec Magenta 0 7) [], Rose (rec Red 8 11) []]) `shouldBe` Result [] (Just (AssignmentState 11 (Info.SourcePos 1 12) "" [], Out "red"))
it "does not drop anonymous nodes after matching" $ it "does not drop anonymous nodes after matching" $