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

Omit the categories in the splitTermByLines test.

This commit is contained in:
Rob Rix 2015-12-21 20:02:17 -05:00
parent b45e10eb92
commit 60edd3b19a

View File

@ -145,11 +145,11 @@ spec = do
describe "splitTermByLines" $ do
it "splits multi-line terms into multiple lines" $
let categories = Set.singleton "leaf" in splitTermByLines (Info (Range 0 5) categories :< Leaf "") "/*\n*/"
splitTermByLines (Info (Range 0 5) mempty :< Leaf "") "/*\n*/"
`shouldBe`
([
Line True [ Info (Range 0 3) categories :< Leaf "" ],
Line True [ Info (Range 3 5) categories :< Leaf "" ]
Line True [ Info (Range 0 3) mempty :< Leaf "" ],
Line True [ Info (Range 3 5) mempty :< Leaf "" ]
], Range 0 5)
describe "openLineBy" $ do