From 2602df9823a804631c422df38ef53a62c9dd4cc5 Mon Sep 17 00:00:00 2001
From: simonm <unknown>
Date: Fri, 15 Jan 1999 13:11:04 +0000
Subject: [PATCH] [project @ 1999-01-15 13:11:04 by simonm] A couple of Int
 type signatures to avoid H98 Integer defaulting.

---
 ghc/compiler/main/Constants.lhs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/ghc/compiler/main/Constants.lhs b/ghc/compiler/main/Constants.lhs
index d5d641f0bc0a..fa4cdbc4ecc5 100644
--- a/ghc/compiler/main/Constants.lhs
+++ b/ghc/compiler/main/Constants.lhs
@@ -87,8 +87,8 @@ module Constants (
 All pretty arbitrary:
 
 \begin{code}
-mAX_TUPLE_SIZE = 37
-mAX_CONTEXT_REDUCTION_DEPTH = 20
+mAX_TUPLE_SIZE = (37 :: Int)
+mAX_CONTEXT_REDUCTION_DEPTH = (20 :: Int)
 \end{code}
 
 \begin{code}
-- 
GitLab