From 2b6b801a8c14595b71269aadddb20f71e498f778 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Thu, 29 Mar 2001 13:33:46 +0000
Subject: [PATCH] [project @ 2001-03-29 13:33:46 by simonmar] use fromIntegral
 instead of fromInt

---
 ghc/tests/numeric/should_run/arith006.hs |    4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/ghc/tests/numeric/should_run/arith006.hs b/ghc/tests/numeric/should_run/arith006.hs
index 8e7ff88..b837692 100644
--- a/ghc/tests/numeric/should_run/arith006.hs
+++ b/ghc/tests/numeric/should_run/arith006.hs
@@ -1,6 +1,4 @@
 -- !!! printing Floats; was a bug in hbc (reported by andy)
 --
 
-import Int( Num(fromInt) )
-
-main = print ((fromInt 42) :: Float)
+main = print ((fromIntegral (42 :: Int)) :: Float)
-- 
1.7.10.4