github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-12-25 16:02:43 +03:00
Code Issues Projects Releases Wiki Activity

Test that we preserve child lines in the output.

Browse Source
This commit is contained in:
Rob Rix 2016-05-26 11:39:24 -04:00
parent 31519322bc
commit 8313074e50
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
test/AlignmentSpec.hs
View File

@ -59,7 +59,11 @@ spec = parallel $ do
sort (nub (keysOfAlignedChildren (alignBranch id children ranges))) `shouldBe` sort (nub (catMaybes (branchElementKey <$> elements)))
prop "covers every line of every input child" $
pendingWith "TBD"
\ elements -> let (_, children, ranges) = toAlignBranchInputs elements in
sort (keysOfAlignedChildren (alignBranch id children ranges)) `shouldBe` sort (do
(key, lines) <- children
line <- lines
these id id (++) . runJoin . ([key] <$) $ line)
describe "alignDiff" $ do
it "aligns identical branches on a single line" $