From: Karl Williamson <public@khwilliamson.com>
Date: Mon, 3 Dec 2012 04:55:16 +0000 (-0700)
Subject: utf8.c: Change is_uni_idfirst_lc() to use Perl's defn
X-Git-Tag: upstream/5.20.0~4545^2~11
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=e85ea4f9037a4e5bb28f0ffaa4c34ef35c39f547;p=platform%2Fupstream%2Fperl.git

utf8.c: Change is_uni_idfirst_lc() to use Perl's defn

The Perl definition is slightly more restrictive of what Unicode's
idfirst is.  We should use our definition consistently.
---

diff --git a/utf8.c b/utf8.c
index 11af768..e3eba9c 100644
--- a/utf8.c
+++ b/utf8.c
@@ -1844,7 +1844,7 @@ Perl_is_uni_alnumc_lc(pTHX_ UV c)
 bool
 Perl_is_uni_idfirst_lc(pTHX_ UV c)
 {
-    return is_uni_idfirst(c);	/* XXX no locale support yet */
+    return _is_uni_perl_idstart(c);	/* XXX no locale support yet */
 }
 
 bool