From db342437d5a0cca1813b023ac186b51c46506655 Mon Sep 17 00:00:00 2001
From: simonpj <unknown>
Date: Wed, 17 Feb 1999 21:54:48 +0000
Subject: [PATCH] [project @ 1999-02-17 21:54:48 by simonpj] Reinstate
specialisations for fromIntegral and realToFrac
---
ghc/lib/std/PrelNumExtra.lhs | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/ghc/lib/std/PrelNumExtra.lhs b/ghc/lib/std/PrelNumExtra.lhs
index 4fcea85b80b6..291c745f16a9 100644
--- a/ghc/lib/std/PrelNumExtra.lhs
+++ b/ghc/lib/std/PrelNumExtra.lhs
@@ -332,7 +332,7 @@ instance Show Double where
%*********************************************************
\begin{code}
-{- SPECIALIZE fromIntegral ::
+{-# SPECIALIZE fromIntegral ::
Int -> Rational,
Integer -> Rational,
Int -> Int,
@@ -346,7 +346,7 @@ instance Show Double where
fromIntegral :: (Integral a, Num b) => a -> b
fromIntegral = fromInteger . toInteger
-{- SPECIALIZE realToFrac ::
+{-# SPECIALIZE realToFrac ::
Double -> Rational,
Rational -> Double,
Float -> Rational,
--
GitLab