mirror of
https://github.com/github/semantic.git
synced 2024-12-24 23:42:31 +03:00
Correct the tests.
This commit is contained in:
parent
5257089ad4
commit
c9ab8a131d
@ -3,6 +3,7 @@ module PatchOutputSpec where
|
||||
import Diff
|
||||
import PatchOutput
|
||||
import Range
|
||||
import Source
|
||||
import Syntax
|
||||
import Control.Monad.Free
|
||||
import Test.Hspec
|
||||
@ -11,4 +12,4 @@ spec :: Spec
|
||||
spec = do
|
||||
describe "hunks" $ do
|
||||
it "empty diffs have no hunks" $
|
||||
hunks (Free . Annotated (Info (Range 0 0) mempty, Info (Range 0 0) mempty) $ Leaf "") "" "" `shouldBe` []
|
||||
hunks (Free . Annotated (Info (Range 0 0) mempty, Info (Range 0 0) mempty) $ Leaf "") (fromList "") (fromList "") `shouldBe` []
|
||||
|
Loading…
Reference in New Issue
Block a user