Mark Data.Map.(!) as INLINABLE instead of INLINE.
authorMilan Straka <fox@ucw.cz>
Wed, 14 Mar 2012 17:30:43 +0000 (18:30 +0100)
committerMilan Straka <fox@ucw.cz>
Wed, 14 Mar 2012 17:30:43 +0000 (18:30 +0100)
commitd95988c2fc7f920b3d6ec2f28166f06ec56be255
tree05f20c7c1dc24cd00dbb3ada58367cafb66ae0fc
parentd4e8b5bd70f87af4463410df3aade72d42d675e0
Mark Data.Map.(!) as INLINABLE instead of INLINE.

This should have been done in commit 3f798e33. As mentioned in the
commit log, the chain
  m ! k = find k m
  {-# INLINE (!) #-}
  find k m = ...
  {-# INLINABLE find #-}
results in find not being specialized at the call site of (!).
Data/Map/Base.hs