From b8aa439a9361fdcc59c722df8c8ed3ca31e91105 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Fri, 12 Nov 2004 15:14:17 +0000
Subject: [PATCH] [project @ 2004-11-12 15:14:17 by simonmar] Note Haskell 98
 divergence in isAlpha.

---
 GHC/Unicode.hs |    9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/GHC/Unicode.hs b/GHC/Unicode.hs
index a98ce24..5b7d47b 100644
--- a/GHC/Unicode.hs
+++ b/GHC/Unicode.hs
@@ -77,6 +77,15 @@ isUpper                 :: Char -> Bool
 isLower                 :: Char -> Bool
 
 -- | Selects alphabetic Unicode characters (letters).
+--
+-- Note: the Haskell 98 definition of 'isAlpha' is:
+--
+-- >   isAlpha c = isUpper c || isLower c
+--
+-- the implementation here diverges from the Haskell 98
+-- definition in the sense that Unicode alphabetic characters which
+-- are neither upper nor lower case will still be identified as
+-- alphabetic by 'isAlpha'.
 isAlpha                 :: Char -> Bool
 
 -- | Selects alphabetic or numeric digit Unicode characters.
-- 
1.7.10.4