From 54e774a71641c42977299d6280fc0da9ea743d0f Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Sun, 18 May 1997 04:09:01 +0000
Subject: [PATCH] [project @ 1997-05-18 04:09:01 by sof] Moved intToDigit to
 PrelBase

---
 ghc/lib/required/Char.lhs |    5 -----
 1 file changed, 5 deletions(-)

diff --git a/ghc/lib/required/Char.lhs b/ghc/lib/required/Char.lhs
index b95487a..3df0bee 100644
--- a/ghc/lib/required/Char.lhs
+++ b/ghc/lib/required/Char.lhs
@@ -41,10 +41,5 @@ digitToInt c
  | c >= 'A' && c <= 'F' =  fromEnum c - fromEnum 'A' + 10
  | otherwise	        =  error "Char.digitToInt: not a digit" -- sigh
 
-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" -- ....
 
 \end{code}
-- 
1.7.10.4