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

On branch  : ghc-7.2

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

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

commit fdd497138778458955c35a8b579568cefef2657d
Author: Ian Lynagh <[email protected]>
Date:   Sat Jul 23 13:31:35 2011 +0100

    Rename toInt# -> integerToInt for consistency

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

 GHC/Integer.hs |    6 +++---
 1 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/GHC/Integer.hs b/GHC/Integer.hs
index 7c21dca..61654f0 100644
--- a/GHC/Integer.hs
+++ b/GHC/Integer.hs
@@ -21,7 +21,7 @@
 
 module GHC.Integer (
     Integer,
-    smallInteger, wordToInteger, integerToWord, toInt#,
+    smallInteger, wordToInteger, integerToWord, integerToInt,
 #if WORD_SIZE_IN_BITS < 64
     integerToWord64, word64ToInteger,
     integerToInt64, int64ToInteger,
@@ -72,8 +72,8 @@ integerToWord (Negative (Some w _)) = 0## `minusWord#` w
 -- Must be Naught by the invariant:
 integerToWord _ = 0##
 
-toInt# :: Integer -> Int#
-toInt# i = word2Int# (integerToWord i)
+integerToInt :: Integer -> Int#
+integerToInt i = word2Int# (integerToWord i)
 
 #if WORD_SIZE_IN_BITS == 64
 -- Nothing



_______________________________________________
Cvs-libraries mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/cvs-libraries

Reply via email to