Use Safe Haskell for GHC >= 7.2
authorDavid Terei <davidterei@gmail.com>
Tue, 2 Aug 2011 22:30:41 +0000 (15:30 -0700)
committerDavid Terei <davidterei@gmail.com>
Tue, 9 Aug 2011 00:14:53 +0000 (17:14 -0700)
Data/Graph.hs
Data/IntMap.hs
Data/IntSet.hs
Data/Map.hs
Data/Sequence.hs
Data/Set.hs
Data/Tree.hs

index 628d5a8..1bc30c3 100644 (file)
@@ -1,3 +1,6 @@
+#if __GLASGOW_HASKELL__ >= 701
+{-# LANGUAGE Trustworthy #-}
+#endif
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  Data.Graph
index 7badc08..cf6a1e4 100644 (file)
@@ -1,4 +1,7 @@
-{-# LANGUAGE CPP, NoBangPatterns, MagicHash, ScopedTypeVariables #-}
+#if !defined(TESTING) && __GLASGOW_HASKELL__ >= 701
+{-# LANGUAGE Trustworthy #-}
+#endif
+{-# LANGUAGE NoBangPatterns, ScopedTypeVariables #-}
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  Data.IntMap
index aa3af01..5679cfc 100644 (file)
@@ -1,4 +1,6 @@
-{-# LANGUAGE CPP, MagicHash #-}
+#if !defined(TESTING) && __GLASGOW_HASKELL__ >= 701
+{-# LANGUAGE Trustworthy #-}
+#endif
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  Data.IntSet
index cec0eff..7a27c2f 100644 (file)
@@ -1,4 +1,7 @@
-{-# LANGUAGE CPP, NoBangPatterns #-}
+#if !defined(TESTING) && __GLASGOW_HASKELL__ >= 701
+{-# LANGUAGE Safe #-}
+#endif
+{-# LANGUAGE NoBangPatterns #-}
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  Data.Map
index e27661f..c2ebb05 100644 (file)
@@ -1,4 +1,6 @@
-{-# LANGUAGE CPP, DeriveDataTypeable #-}
+#if __GLASGOW_HASKELL__ >= 701
+{-# LANGUAGE Trustworthy #-}
+#endif
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  Data.Sequence
index ea0e571..37ce876 100644 (file)
@@ -1,4 +1,6 @@
-{-# LANGUAGE CPP #-}
+#if !defined(TESTING) && __GLASGOW_HASKELL__ >= 701
+{-# LANGUAGE Safe #-}
+#endif
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  Data.Set
index 25097c0..40de39a 100644 (file)
@@ -1,3 +1,6 @@
+#if __GLASGOW_HASKELL__ >= 701
+{-# LANGUAGE Safe #-}
+#endif
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  Data.Tree