[project @ 2005-01-19 23:33:25 by ross]

[ghc-base.git] / Data / IntMap.hs

diff --git a/Data/IntMap.hs b/Data/IntMap.hs
index 46c6bee..9056628 100644 (file)
--- a/Data/IntMap.hs
+++ b/Data/IntMap.hs
@@ -209,12 +209,12 @@ type Prefix = Int
 type Mask   = Int
 type Key    = Int
 
+#if __GLASGOW_HASKELL__
+
 {--------------------------------------------------------------------
   A Data instance  
 --------------------------------------------------------------------}
 
-#if __GLASGOW_HASKELL__
-
 -- This instance preserves data abstraction at the cost of inefficiency.
 -- We omit reflection services for the sake of data abstraction.