Permalink
Browse files

benchmarks: rename hashmap/HashMap to hashmap/Map

  • Loading branch information...
1 parent dea3220 commit f9bf52f321278c9bcb15ee4a7bd42dcec54f840b @tibbe committed Jan 15, 2013
Showing with 3 additions and 3 deletions.
  1. +3 −3 benchmarks/Benchmarks.hs
View
@@ -83,8 +83,8 @@ main = do
]
]
- -- ** HashMap from the hashmap package
- , bgroup "hashmap/HashMap"
+ -- ** Map from the hashmap package
+ , bgroup "hashmap/Map"
[ bgroup "lookup"
[ bench "String" $ whnf (lookupIHM keys) ihm
, bench "ByteString" $ whnf (lookupIHM keysBS) ihmbs
@@ -300,7 +300,7 @@ deleteM xs m0 = foldl' (\m k -> M.delete k m) m0 xs
-> M.Map BS.ByteString Int #-}
------------------------------------------------------------------------
--- * HashMap from the hashmap package
+-- * Map from the hashmap package
lookupIHM :: (Eq k, Hashable k, Ord k) => [k] -> IHM.Map k Int -> Int
lookupIHM xs m = foldl' (\z k -> fromMaybe z (IHM.lookup k m)) 0 xs

0 comments on commit f9bf52f

Please sign in to comment.