From 18b2205d0d82c7abd5a5b9432f20698417db4356 Mon Sep 17 00:00:00 2001
From: bjorn <bjorn@bringert.net>
Date: Fri, 8 Feb 2008 09:20:32 +0000
Subject: [PATCH] Use isAlpha instead of isLetter to compile with GHC 6.4.
 Reported by moises.

---
 src/GF/GFCC/Raw/ParGFCCRaw.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/GF/GFCC/Raw/ParGFCCRaw.hs b/src/GF/GFCC/Raw/ParGFCCRaw.hs
index 051358211..b71904948 100644
--- a/src/GF/GFCC/Raw/ParGFCCRaw.hs
+++ b/src/GF/GFCC/Raw/ParGFCCRaw.hs
@@ -28,7 +28,7 @@ pTerm n = skipSpaces >> (pParen <++ pApp <++ pNum <++ pStr <++ pMeta)
                    return (AInt (read x)))
         pMeta = char '?' >> return AMet
         pIdent = liftM CId $ liftM2 (:) (satisfy isIdentFirst) (munch isIdentRest)
-        isIdentFirst c = c == '_' || isLetter c
+        isIdentFirst c = c == '_' || isAlpha c
         isIdentRest c = c == '_' || c == '\'' || isAlphaNum c
 
 -- Parser combinators with only left-biased choice