Repository : ssh://darcs.haskell.org//srv/darcs/packages/base On branch : master
http://hackage.haskell.org/trac/ghc/changeset/b9d497274e8bc2f9ca7784652ae2fe08f30135e8 >--------------------------------------------------------------- commit b9d497274e8bc2f9ca7784652ae2fe08f30135e8 Author: Daniel Fischer <[email protected]> Date: Sun Oct 2 14:13:39 2011 +0200 Removed pointless rule (realToFrac :: Int -> Int) >--------------------------------------------------------------- GHC/Real.lhs | 4 ---- 1 files changed, 0 insertions(+), 4 deletions(-) diff --git a/GHC/Real.lhs b/GHC/Real.lhs index 8597c45..4bc1d09 100644 --- a/GHC/Real.lhs +++ b/GHC/Real.lhs @@ -406,10 +406,6 @@ fromIntegral = fromInteger . toInteger -- | general coercion to fractional types realToFrac :: (Real a, Fractional b) => a -> b realToFrac = fromRational . toRational - -{-# RULES -"realToFrac/Int->Int" realToFrac = id :: Int -> Int - #-} \end{code} %********************************************************* _______________________________________________ Cvs-libraries mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-libraries
