From: simonm <unknown>
Date: Tue, 3 Feb 1998 11:39:00 +0000 (+0000)
Subject: [project @ 1998-02-03 11:39:00 by simonm]
X-Git-Tag: Approx_2487_patches~1008
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=f6b00c00c72d62b34520244d8ca8aa1c638830db;p=ghc-hetmet.git

[project @ 1998-02-03 11:39:00 by simonm]
missing '('.
---

diff --git a/ghc/lib/std/PrelBase.lhs b/ghc/lib/std/PrelBase.lhs
index 3f5bc1d..2d504bc 100644
--- a/ghc/lib/std/PrelBase.lhs
+++ b/ghc/lib/std/PrelBase.lhs
@@ -791,7 +791,7 @@ intToDigit :: Int -> Char
 intToDigit i
  | i >= 0  && i <=  9   =  toEnum (fromEnum '0' + i)
  | i >= 10 && i <= 15   =  toEnum (fromEnum 'a' + i -10)
- | otherwise		=  error "Char.intToDigit: not a digit" ++ show i)
+ | otherwise		=  error ("Char.intToDigit: not a digit" ++ show i)
 
 \end{code}