From: sof Date: Wed, 21 Oct 1998 11:37:03 +0000 (+0000) Subject: [project @ 1998-10-21 11:37:03 by sof] X-Git-Tag: Approx_2487_patches~232 X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=2ab7971a23fb7b2a5613ab2f1d1c706bea7c28aa;p=ghc-hetmet.git [project @ 1998-10-21 11:37:03 by sof] Removed commented-out Haskell-1.2 methods --- diff --git a/ghc/lib/std/PrelNum.lhs b/ghc/lib/std/PrelNum.lhs index 3930bfd..603caf1 100644 --- a/ghc/lib/std/PrelNum.lhs +++ b/ghc/lib/std/PrelNum.lhs @@ -268,9 +268,6 @@ instance Integral Int where divMod x@(I# _) y@(I# _) = (x `div` y, x `mod` y) -- Stricter. Sorry if you don't like it. (WDP 94/10) ---OLD: even x = eqInt (x `mod` 2) 0 ---OLD: odd x = neInt (x `mod` 2) 0 - toInteger (I# n#) = int2Integer# n# -- give back a full-blown Integer toInt x = x