From: John Darrington <john@darrington.wattle.id.au>
Date: Fri, 27 Mar 2009 02:51:35 +0000 (+0900)
Subject: Made var_is_valid_name more permissive.
X-Git-Tag: v0.7.3~199
X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=90f346cc015bb89d28c93e35ba2e23d6671e14f2;p=pspp-builds.git

Made var_is_valid_name more permissive.

Allowed lex_is_id1 and lex_is_id2 to match non-ascii characters,
in addition to the others it tests for.
---

diff --git a/src/data/identifier.c b/src/data/identifier.c
index a52944e2..37384b6d 100644
--- a/src/data/identifier.c
+++ b/src/data/identifier.c
@@ -35,7 +35,7 @@ bool
 lex_is_id1 (char c_)
 {
   unsigned char c = c_;
-  return isalpha (c) || c == '@' || c == '#' || c == '$';
+  return isalpha (c) || c == '@' || c == '#' || c == '$' || c >= 128;
 }
 
 
@@ -45,7 +45,7 @@ bool
 lex_is_idn (char c_)
 {
   unsigned char c = c_;
-  return lex_is_id1 (c) || isdigit (c) || c == '.' || c == '_';
+  return lex_is_id1 (c) || isdigit (c) || c == '.' || c == '_' || c >= 128;
 }
 
 /* Returns the length of the longest prefix of STRING that forms