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

On branch  : master

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

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

commit fdeac879c5f085a2efe9355444f160936edb440e
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 118e0c6..26e6210 100644
--- a/GHC/Integer.hs
+++ b/GHC/Integer.hs
@@ -23,7 +23,7 @@
 
 module GHC.Integer (
     Integer,
-    smallInteger, wordToInteger, integerToWord, toInt#,
+    smallInteger, wordToInteger, integerToWord, integerToInt,
 #if WORD_SIZE_IN_BITS < 64
     integerToWord64, word64ToInteger,
     integerToInt64, int64ToInteger,
@@ -75,8 +75,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