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

Silence a warning.

Browse Source
This commit is contained in:
Rob Rix 2016-07-12 18:09:01 -04:00
parent a327ab67a4
commit 4869729770
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/OrderedMapSpec.hs
View File

@ -12,7 +12,7 @@ spec :: Spec
spec = parallel $ do spec = parallel $ do
describe "difference" $ do describe "difference" $ do
it "should return those elements of a not in b" $ it "should return those elements of a not in b" $
Map.difference a b `shouldBe` Map.fromList [ ("a", 1) ] Map.difference a b `shouldBe` Map.fromList [ ("a", 1) :: (Text, Integer) ]
it "is asymmetrical" $ it "is asymmetrical" $
Map.difference a b `shouldNotBe` Map.difference b a Map.difference a b `shouldNotBe` Map.difference b a