projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Always enable the archive-loading code
[ghc-hetmet.git]
/
compiler
/
utils
/
FastMutInt.lhs
diff --git
a/compiler/utils/FastMutInt.lhs
b/compiler/utils/FastMutInt.lhs
index
c29b568
..
61e3e85
100644
(file)
--- a/
compiler/utils/FastMutInt.lhs
+++ b/
compiler/utils/FastMutInt.lhs
@@
-1,4
+1,5
@@
\begin{code}
\begin{code}
+{-# LANGUAGE BangPatterns #-}
{-# OPTIONS -cpp #-}
{-# OPTIONS_GHC -O #-}
-- We always optimise this, otherwise performance of a non-optimised
{-# OPTIONS -cpp #-}
{-# OPTIONS_GHC -O #-}
-- We always optimise this, otherwise performance of a non-optimised
@@
-19,15
+20,20
@@
module FastMutInt(
#ifdef __GLASGOW_HASKELL__
#ifdef __GLASGOW_HASKELL__
-#include "MachDeps.h"
+#include "../includes/MachDeps.h"
#ifndef SIZEOF_HSINT
#define SIZEOF_HSINT INT_SIZE_IN_BYTES
#endif
import GHC.Base
#ifndef SIZEOF_HSINT
#define SIZEOF_HSINT INT_SIZE_IN_BYTES
#endif
import GHC.Base
-import GHC.IOBase
import GHC.Ptr
import GHC.Ptr
+#if __GLASGOW_HASKELL__ >= 611
+-- import GHC.IO ( IO(..) )
+#else
+import GHC.IOBase ( IO(..) )
+#endif
+
#else /* ! __GLASGOW_HASKELL__ */
import Data.IORef
#else /* ! __GLASGOW_HASKELL__ */
import Data.IORef