[commit: integer-gmp] master: NOINLINE a couple more functions (ebc9691)

[Ian Lynagh]

Repository : ssh://darcs.haskell.org//srv/darcs/packages/integer-gmp

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/ebc96919582ead679984dbddec4e169a7c1957a0

>---------------------------------------------------------------

commit ebc96919582ead679984dbddec4e169a7c1957a0
Author: Ian Lynagh <igloo at earth.li>
Date:   Tue Sep 13 19:48:38 2011 +0100

    NOINLINE a couple more functions
    
    We don't need them to be inlined at all, following changes in how
    GHC handles Integers.

>---------------------------------------------------------------

 GHC/Integer/Type.lhs |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/GHC/Integer/Type.lhs b/GHC/Integer/Type.lhs
index d74b2f7..eef256b 100644
--- a/GHC/Integer/Type.lhs
+++ b/GHC/Integer/Type.lhs
@@ -72,11 +72,11 @@ data Integer
    = S# Int#                            -- small integers
    | J# Int# ByteArray#                 -- large integers
 
-{-# INLINE [0] smallInteger #-}
+{-# NOINLINE smallInteger #-}
 smallInteger :: Int# -> Integer
 smallInteger i = S# i
 
-{-# INLINE [0] wordToInteger #-}
+{-# NOINLINE wordToInteger #-}
 wordToInteger :: Word# -> Integer
 wordToInteger w = case word2Integer# w of (# s, d #) -> J# s d