[commit: base] master: Removed pointless rule (realToFrac :: Int -> Int) (b9d4972)

[Daniel Fischer]

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 <daniel.is.fischer at googlemail.com>
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}
 
 %*********************************************************