diff options
| author | Krasimir Angelov <kr.angelov@gmail.com> | 2017-08-18 21:27:40 +0200 |
|---|---|---|
| committer | Krasimir Angelov <kr.angelov@gmail.com> | 2017-08-18 21:27:40 +0200 |
| commit | 0a3b822313cc664cef860b39ec74c21e0d00475b (patch) | |
| tree | 5994c67ad1d79820d18451518265de5c91c60b30 /src/runtime/haskell | |
| parent | 1f3c9d0b1736daa979e195bc07d971421768e4ad (diff) | |
| parent | 0a0eaa01bcbe9574bb86a6470ca5139fbd32a9d3 (diff) | |
????
Merge branch 'master' of www.grammaticalframework.org:/usr/local/www/GF
Diffstat (limited to 'src/runtime/haskell')
| -rw-r--r-- | src/runtime/haskell/PGF/Optimize.hs | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/src/runtime/haskell/PGF/Optimize.hs b/src/runtime/haskell/PGF/Optimize.hs index 45b4311a5..8739c8665 100644 --- a/src/runtime/haskell/PGF/Optimize.hs +++ b/src/runtime/haskell/PGF/Optimize.hs @@ -1,4 +1,4 @@ -{-# LANGUAGE CPP, BangPatterns #-} +{-# LANGUAGE BangPatterns #-} module PGF.Optimize ( optimizePGF , updateProductionIndices @@ -11,11 +11,7 @@ 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 |