blob: a87ca5d7c39c6c85379a784ad9de1455af4678e5 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
commit d31eb5c02b65514e695b45c0c01cbd45a36bac4a
Author: OOHASHI Daichi <dico.leque.comicron@gmail.com>
Date: Thu Oct 20 10:48:17 2016 +0900
(char-general-category #\x20000) should be Lo
diff --git a/src/gauche/char_utf_8.h b/src/gauche/char_utf_8.h
index 082e764..5f92d13 100644
--- a/src/gauche/char_utf_8.h
+++ b/src/gauche/char_utf_8.h
@@ -294,7 +294,7 @@ static inline unsigned char Scm__LookupCharCategory(ScmChar ch)
{
if (ch == SCM_CHAR_INVALID || ch >= 0x10ffff) {
return SCM_CHAR_CATEGORY_Cn;
- } else if (ch <= 0x20000) {
+ } else if (ch < 0x20000) {
return ucs_general_category_00000[ch];
} else {
return ucs_general_category_20000(ch);
|
