X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Futils%2FFastMutInt.lhs;h=26183071f15c2622b5d5cd8ad7eafd5612822535;hp=c29b568426bc1440b1271474faa9c3c790832409;hb=edc0bafd3fcd01b85a2e8894e5dfe149eb0e0857;hpb=831a35dd00faff195cf938659c2dd736192b865f diff --git a/compiler/utils/FastMutInt.lhs b/compiler/utils/FastMutInt.lhs index c29b568..2618307 100644 --- a/compiler/utils/FastMutInt.lhs +++ b/compiler/utils/FastMutInt.lhs @@ -1,4 +1,5 @@ \begin{code} +{-# LANGUAGE BangPatterns #-} {-# OPTIONS -cpp #-} {-# OPTIONS_GHC -O #-} -- We always optimise this, otherwise performance of a non-optimised @@ -19,13 +20,12 @@ module FastMutInt( #ifdef __GLASGOW_HASKELL__ -#include "MachDeps.h" +#include "../includes/MachDeps.h" #ifndef SIZEOF_HSINT #define SIZEOF_HSINT INT_SIZE_IN_BYTES #endif import GHC.Base -import GHC.IOBase import GHC.Ptr #else /* ! __GLASGOW_HASKELL__ */