diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2011-10-14 10:01:06 +0100 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2011-10-14 10:01:06 +0100 |
| commit | e84f5b11c52f7ca692e1f8bd98fdc0585799179c (patch) | |
| tree | ea352ec5499364e754cee02e4d8b4541f93b4c21 /libraries/integer-simple | |
| parent | 5a195cc77d81dcd338f6db87fdd8dd835e50a9be (diff) | |
| download | haskell-e84f5b11c52f7ca692e1f8bd98fdc0585799179c.tar.gz | |
remove erroneous '::' in NOINLINE pragma
Diffstat (limited to 'libraries/integer-simple')
| -rw-r--r-- | libraries/integer-simple/GHC/Integer/Type.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libraries/integer-simple/GHC/Integer/Type.hs b/libraries/integer-simple/GHC/Integer/Type.hs index 02eeef24bd..c3d812c1fe 100644 --- a/libraries/integer-simple/GHC/Integer/Type.hs +++ b/libraries/integer-simple/GHC/Integer/Type.hs @@ -97,7 +97,7 @@ integerToInt i = word2Int# (integerToWord i) integerToWord64 :: Integer -> Word64# integerToWord64 i = int64ToWord64# (integerToInt64 i) -{-# NOINLINE word64ToInteger:: #-} +{-# NOINLINE word64ToInteger #-} word64ToInteger:: Word64# -> Integer word64ToInteger w = if w `eqWord64#` wordToWord64# 0## then Naught |