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

Placate hlint.

Browse Source
This commit is contained in:
Rob Rix 2016-07-12 17:16:10 -04:00
parent 2d4dadb167
commit 3d73efc6d3
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

@ -15,7 +15,7 @@ spec = parallel $ do
describe "union" $ do
it "should return those elements in either a or b" $
Map.union a b `shouldBe` Map.fromList (Map.toList a ++ [ ("d", -4) ])
Map.union a b `shouldBe` Map.fromList (Map.toList a <> [ ("d", -4) ])
it "is asymmetrical" $
Map.union a b `shouldNotBe` Map.union b a