From c9af5d11c0d46c2c817ef4bf7a9d68c77d05d995 Mon Sep 17 00:00:00 2001
From: hallgren <hallgren@chalmers.se>
Date: Mon, 10 Feb 2014 21:44:34 +0000
Subject: Restore compatibility with GHC 7.0

---
 src/runtime/haskell/PGF/Optimize.hs | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'src/runtime/haskell')

diff --git a/src/runtime/haskell/PGF/Optimize.hs b/src/runtime/haskell/PGF/Optimize.hs
index 3f7a2e7f7..6944eb209 100644
--- a/src/runtime/haskell/PGF/Optimize.hs
+++ b/src/runtime/haskell/PGF/Optimize.hs
@@ -1,4 +1,4 @@
-{-# LANGUAGE BangPatterns #-}
+{-# LANGUAGE CPP, BangPatterns #-}
 module PGF.Optimize
              ( optimizePGF
              , updateProductionIndices
@@ -11,7 +11,11 @@ import PGF.Macros
 import Data.List (mapAccumL)
 import Data.Array.IArray
 import Data.Array.MArray
+#if MIN_VERSION_base(4,6,0)
 import Data.Array.Unsafe as U(unsafeFreeze)
+#else
+import Data.Array.ST as U(unsafeFreeze)
+#endif
 import Data.Array.ST
 import Data.Array.Unboxed
 import qualified Data.Map as Map
-- 
cgit v1.2.3