From: simonmar <unknown>
Date: Tue, 12 Feb 2002 15:51:26 +0000 (+0000)
Subject: [project @ 2002-02-12 15:51:26 by simonmar]
X-Git-Tag: nhc98-1-18-release~1129
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=9b32fc97f6946758f4fc46f89e5411e133e99ff8;p=ghc-base.git

[project @ 2002-02-12 15:51:26 by simonmar]
Remove fromInt/toInt
---

diff --git a/GHC/Real.lhs b/GHC/Real.lhs
index 0c27ce3..98edd2e 100644
--- a/GHC/Real.lhs
+++ b/GHC/Real.lhs
@@ -1,5 +1,5 @@
 % ------------------------------------------------------------------------------
-% $Id: Real.lhs,v 1.2 2001/12/21 15:07:25 simonmar Exp $
+% $Id: Real.lhs,v 1.3 2002/02/12 15:51:26 simonmar Exp $
 %
 % (c) The University of Glasgow, 1994-2000
 %
@@ -282,16 +282,6 @@ realToFrac = fromRational . toRational
 {-# RULES
 "realToFrac/Int->Int" realToFrac = id :: Int -> Int
     #-}
-
--- For backward compatibility
-{-# DEPRECATED fromInt "use fromIntegral instead" #-}
-fromInt :: Num a => Int -> a
-fromInt = fromIntegral
-
--- For backward compatibility
-{-# DEPRECATED toInt "use fromIntegral instead" #-}
-toInt :: Integral a => a -> Int
-toInt = fromIntegral
 \end{code}
 
 %*********************************************************