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

Indentation.

Browse Source
This commit is contained in:
Rob Rix 2016-09-13 13:14:02 -04:00
parent c5fed4ac25
commit 6ce0ce5e26
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/Source/Spec.hs
View File

@ -22,4 +22,4 @@ spec = parallel $ do
\ s -> let source = fromList s \ s -> let source = fromList s
spans = zipWith (\ i Range {..} -> SourceSpan "" (SourcePos i 0) (SourcePos i (end - start))) [0..] ranges spans = zipWith (\ i Range {..} -> SourceSpan "" (SourcePos i 0) (SourcePos i (end - start))) [0..] ranges
ranges = actualLineRanges (totalRange source) source in ranges = actualLineRanges (totalRange source) source in
sourceSpanToRange source <$> spans `shouldBe` ranges sourceSpanToRange source <$> spans `shouldBe` ranges