X-Git-Url: http://git.megacz.com/?p=ghc-prim.git;a=blobdiff_plain;f=GHC%2FIntWord64.hs;h=5260867a983c5734becbf1cd83e0edd514cec12a;hp=1facda4d3634a3d381c8a55c5f24b31724eb509d;hb=a597405dc3b74978ad20b91f9af82b3d387ac82c;hpb=a5e24955ea9e3bfb971a3d9523e01893049e4d7e diff --git a/GHC/IntWord64.hs b/GHC/IntWord64.hs index 1facda4..5260867 100644 --- a/GHC/IntWord64.hs +++ b/GHC/IntWord64.hs @@ -62,8 +62,6 @@ foreign import ccall unsafe "hs_uncheckedIShiftL64" uncheckedIShiftL64# :: Int foreign import ccall unsafe "hs_uncheckedIShiftRA64" uncheckedIShiftRA64# :: Int64# -> Int# -> Int64# foreign import ccall unsafe "hs_uncheckedIShiftRL64" uncheckedIShiftRL64# :: Int64# -> Int# -> Int64# -foreign import ccall unsafe "hs_integerToWord64" integerToWord64# :: Int# -> ByteArray# -> Word64# -foreign import ccall unsafe "hs_integerToInt64" integerToInt64# :: Int# -> ByteArray# -> Int64# foreign import ccall unsafe "hs_int64ToWord64" int64ToWord64# :: Int64# -> Word64# foreign import ccall unsafe "hs_word64ToInt64" word64ToInt64# :: Word64# -> Int64# foreign import ccall unsafe "hs_intToInt64" intToInt64# :: Int# -> Int64#