From a92b6e47237b357a024c204209aa82411edaf417 Mon Sep 17 00:00:00 2001
From: simonm <unknown>
Date: Fri, 15 Jan 1999 15:01:41 +0000
Subject: [PATCH] [project @ 1999-01-15 15:01:41 by simonm] #if __HASKELL1__ >
 4 import Ratio (numerator, denominator) #endif

---
 ghc/compiler/basicTypes/Const.lhs | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/ghc/compiler/basicTypes/Const.lhs b/ghc/compiler/basicTypes/Const.lhs
index d254cbe10bb2..0b0a3d8a7036 100644
--- a/ghc/compiler/basicTypes/Const.lhs
+++ b/ghc/compiler/basicTypes/Const.lhs
@@ -36,6 +36,10 @@ import CStrings		( stringToC, charToC, charToEasyHaskell )
 
 import Outputable
 import Util		( thenCmp )
+
+#if __HASKELL1__ > 4
+import Ratio (numerator, denominator)
+#endif
 \end{code}
 
 
-- 
GitLab