diff options
Diffstat (limited to 'compiler/utils/FastFunctions.lhs')
| -rw-r--r-- | compiler/utils/FastFunctions.lhs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/compiler/utils/FastFunctions.lhs b/compiler/utils/FastFunctions.lhs index 5496ed051c..b1dacdcd9b 100644 --- a/compiler/utils/FastFunctions.lhs +++ b/compiler/utils/FastFunctions.lhs @@ -22,9 +22,10 @@ import System.IO.Unsafe import GHC.Exts import GHC.Word -import GHC.IO (IO(..), unsafeDupableInterleaveIO) import GHC.Base (unsafeChr) +import GHC.IO (IO(..), unsafeDupableInterleaveIO) + -- Just like unsafePerformIO, but we inline it. {-# INLINE inlinePerformIO #-} inlinePerformIO :: IO a -> a |