[commit: containers] master: Add forgotten GHC >= 7.0 condition in (!). (1a68259)

[Paolo Capriotti]

Repository : ssh://darcs.haskell.org//srv/darcs/packages/containers

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/1a682593892f44d4727a53a51685d29d47042d33

>---------------------------------------------------------------

commit 1a682593892f44d4727a53a51685d29d47042d33
Author: Milan Straka <fox at ucw.cz>
Date:   Fri Apr 20 17:43:14 2012 +0200

    Add forgotten GHC >= 7.0 condition in (!).
    
    The INLINABLE pragma works only for GHC >= 7.0 and generates
    warning for older compilers.

>---------------------------------------------------------------

 Data/Map/Base.hs |    2 ++
 1 files changed, 2 insertions(+), 0 deletions(-)

diff --git a/Data/Map/Base.hs b/Data/Map/Base.hs
index 48d3723..95d3972 100644
--- a/Data/Map/Base.hs
+++ b/Data/Map/Base.hs
@@ -255,7 +255,9 @@ infixl 9 !,\\ --
 
 (!) :: Ord k => Map k a -> k -> a
 m ! k    = find k m
+#if __GLASGOW_HASKELL__ >= 700
 {-# INLINABLE (!) #-}
+#endif
 
 -- | Same as 'difference'.
 (\\) :: Ord k => Map k a -> Map k b -> Map k a