summaryrefslogtreecommitdiff
path: root/Build/source/libs/lua52/lua52-PATCHES/patch-01-utf-8
blob: 9ad9749410600bf91b357a34ec8415ce1f14b4ac (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
diff -ur lua-5.2.4.orig/src/lctype.h lua-5.2.4/src/lctype.h
--- lua-5.2.4.orig/src/lctype.h	2013-04-12 20:48:47.000000000 +0200
+++ lua-5.2.4/src/lctype.h	2014-02-13 13:17:33.000000000 +0100
@@ -7,6 +7,8 @@
 #ifndef lctype_h
 #define lctype_h
 
+#include <ctype.h>
+
 #include "lua.h"
 
 
@@ -53,9 +55,11 @@
 
 /*
 ** 'lalpha' (Lua alphabetic) and 'lalnum' (Lua alphanumeric) both include '_'
+**
+** all utf-8 chars (greater than 0x7f) are always alphabetic
 */
-#define lislalpha(c)	testprop(c, MASK(ALPHABIT))
-#define lislalnum(c)	testprop(c, (MASK(ALPHABIT) | MASK(DIGITBIT)))
+#define lislalpha(c)	(isalpha(c) || (c) == '_' || (c) > 0x7f)
+#define lislalnum(c)	(isalnum(c) || (c) == '_' || (c) > 0x7f)
 #define lisdigit(c)	testprop(c, MASK(DIGITBIT))
 #define lisspace(c)	testprop(c, MASK(SPACEBIT))
 #define lisprint(c)	testprop(c, MASK(PRINTBIT))