| 955 |
break; |
break; |
| 956 |
|
|
| 957 |
case PT_LAMP: |
case PT_LAMP: |
| 958 |
OK = prop->chartype == ucp_Lu || prop->chartype == ucp_Ll || prop->chartype == ucp_Lt; |
OK = prop->chartype == ucp_Lu || prop->chartype == ucp_Ll || |
| 959 |
|
prop->chartype == ucp_Lt; |
| 960 |
break; |
break; |
| 961 |
|
|
| 962 |
case PT_GC: |
case PT_GC: |
| 970 |
case PT_SC: |
case PT_SC: |
| 971 |
OK = prop->script == code[2]; |
OK = prop->script == code[2]; |
| 972 |
break; |
break; |
| 973 |
|
|
| 974 |
|
/* These are specials for combination cases. */ |
| 975 |
|
|
| 976 |
|
case PT_ALNUM: |
| 977 |
|
OK = _pcre_ucp_gentype[prop->chartype] == ucp_L || |
| 978 |
|
_pcre_ucp_gentype[prop->chartype] == ucp_N; |
| 979 |
|
break; |
| 980 |
|
|
| 981 |
|
case PT_SPACE: /* Perl space */ |
| 982 |
|
OK = _pcre_ucp_gentype[prop->chartype] == ucp_Z || |
| 983 |
|
c == CHAR_HT || c == CHAR_NL || c == CHAR_FF || c == CHAR_CR; |
| 984 |
|
break; |
| 985 |
|
|
| 986 |
|
case PT_PXSPACE: /* POSIX space */ |
| 987 |
|
OK = _pcre_ucp_gentype[prop->chartype] == ucp_Z || |
| 988 |
|
c == CHAR_HT || c == CHAR_NL || c == CHAR_VT || |
| 989 |
|
c == CHAR_FF || c == CHAR_CR; |
| 990 |
|
break; |
| 991 |
|
|
| 992 |
|
case PT_WORD: |
| 993 |
|
OK = _pcre_ucp_gentype[prop->chartype] == ucp_L || |
| 994 |
|
_pcre_ucp_gentype[prop->chartype] == ucp_N || |
| 995 |
|
c == CHAR_UNDERSCORE; |
| 996 |
|
break; |
| 997 |
|
|
| 998 |
/* Should never occur, but keep compilers from grumbling. */ |
/* Should never occur, but keep compilers from grumbling. */ |
| 999 |
|
|
| 1149 |
break; |
break; |
| 1150 |
|
|
| 1151 |
case PT_LAMP: |
case PT_LAMP: |
| 1152 |
OK = prop->chartype == ucp_Lu || prop->chartype == ucp_Ll || prop->chartype == ucp_Lt; |
OK = prop->chartype == ucp_Lu || prop->chartype == ucp_Ll || |
| 1153 |
|
prop->chartype == ucp_Lt; |
| 1154 |
break; |
break; |
| 1155 |
|
|
| 1156 |
case PT_GC: |
case PT_GC: |
| 1165 |
OK = prop->script == code[3]; |
OK = prop->script == code[3]; |
| 1166 |
break; |
break; |
| 1167 |
|
|
| 1168 |
|
/* These are specials for combination cases. */ |
| 1169 |
|
|
| 1170 |
|
case PT_ALNUM: |
| 1171 |
|
OK = _pcre_ucp_gentype[prop->chartype] == ucp_L || |
| 1172 |
|
_pcre_ucp_gentype[prop->chartype] == ucp_N; |
| 1173 |
|
break; |
| 1174 |
|
|
| 1175 |
|
case PT_SPACE: /* Perl space */ |
| 1176 |
|
OK = _pcre_ucp_gentype[prop->chartype] == ucp_Z || |
| 1177 |
|
c == CHAR_HT || c == CHAR_NL || c == CHAR_FF || c == CHAR_CR; |
| 1178 |
|
break; |
| 1179 |
|
|
| 1180 |
|
case PT_PXSPACE: /* POSIX space */ |
| 1181 |
|
OK = _pcre_ucp_gentype[prop->chartype] == ucp_Z || |
| 1182 |
|
c == CHAR_HT || c == CHAR_NL || c == CHAR_VT || |
| 1183 |
|
c == CHAR_FF || c == CHAR_CR; |
| 1184 |
|
break; |
| 1185 |
|
|
| 1186 |
|
case PT_WORD: |
| 1187 |
|
OK = _pcre_ucp_gentype[prop->chartype] == ucp_L || |
| 1188 |
|
_pcre_ucp_gentype[prop->chartype] == ucp_N || |
| 1189 |
|
c == CHAR_UNDERSCORE; |
| 1190 |
|
break; |
| 1191 |
|
|
| 1192 |
/* Should never occur, but keep compilers from grumbling. */ |
/* Should never occur, but keep compilers from grumbling. */ |
| 1193 |
|
|
| 1194 |
default: |
default: |
| 1396 |
break; |
break; |
| 1397 |
|
|
| 1398 |
case PT_LAMP: |
case PT_LAMP: |
| 1399 |
OK = prop->chartype == ucp_Lu || prop->chartype == ucp_Ll || prop->chartype == ucp_Lt; |
OK = prop->chartype == ucp_Lu || prop->chartype == ucp_Ll || |
| 1400 |
|
prop->chartype == ucp_Lt; |
| 1401 |
break; |
break; |
| 1402 |
|
|
| 1403 |
case PT_GC: |
case PT_GC: |
| 1411 |
case PT_SC: |
case PT_SC: |
| 1412 |
OK = prop->script == code[3]; |
OK = prop->script == code[3]; |
| 1413 |
break; |
break; |
| 1414 |
|
|
| 1415 |
|
/* These are specials for combination cases. */ |
| 1416 |
|
|
| 1417 |
|
case PT_ALNUM: |
| 1418 |
|
OK = _pcre_ucp_gentype[prop->chartype] == ucp_L || |
| 1419 |
|
_pcre_ucp_gentype[prop->chartype] == ucp_N; |
| 1420 |
|
break; |
| 1421 |
|
|
| 1422 |
|
case PT_SPACE: /* Perl space */ |
| 1423 |
|
OK = _pcre_ucp_gentype[prop->chartype] == ucp_Z || |
| 1424 |
|
c == CHAR_HT || c == CHAR_NL || c == CHAR_FF || c == CHAR_CR; |
| 1425 |
|
break; |
| 1426 |
|
|
| 1427 |
|
case PT_PXSPACE: /* POSIX space */ |
| 1428 |
|
OK = _pcre_ucp_gentype[prop->chartype] == ucp_Z || |
| 1429 |
|
c == CHAR_HT || c == CHAR_NL || c == CHAR_VT || |
| 1430 |
|
c == CHAR_FF || c == CHAR_CR; |
| 1431 |
|
break; |
| 1432 |
|
|
| 1433 |
|
case PT_WORD: |
| 1434 |
|
OK = _pcre_ucp_gentype[prop->chartype] == ucp_L || |
| 1435 |
|
_pcre_ucp_gentype[prop->chartype] == ucp_N || |
| 1436 |
|
c == CHAR_UNDERSCORE; |
| 1437 |
|
break; |
| 1438 |
|
|
| 1439 |
/* Should never occur, but keep compilers from grumbling. */ |
/* Should never occur, but keep compilers from grumbling. */ |
| 1440 |
|
|
| 1668 |
break; |
break; |
| 1669 |
|
|
| 1670 |
case PT_LAMP: |
case PT_LAMP: |
| 1671 |
OK = prop->chartype == ucp_Lu || prop->chartype == ucp_Ll || prop->chartype == ucp_Lt; |
OK = prop->chartype == ucp_Lu || prop->chartype == ucp_Ll || |
| 1672 |
|
prop->chartype == ucp_Lt; |
| 1673 |
break; |
break; |
| 1674 |
|
|
| 1675 |
case PT_GC: |
case PT_GC: |
| 1683 |
case PT_SC: |
case PT_SC: |
| 1684 |
OK = prop->script == code[5]; |
OK = prop->script == code[5]; |
| 1685 |
break; |
break; |
| 1686 |
|
|
| 1687 |
|
/* These are specials for combination cases. */ |
| 1688 |
|
|
| 1689 |
|
case PT_ALNUM: |
| 1690 |
|
OK = _pcre_ucp_gentype[prop->chartype] == ucp_L || |
| 1691 |
|
_pcre_ucp_gentype[prop->chartype] == ucp_N; |
| 1692 |
|
break; |
| 1693 |
|
|
| 1694 |
|
case PT_SPACE: /* Perl space */ |
| 1695 |
|
OK = _pcre_ucp_gentype[prop->chartype] == ucp_Z || |
| 1696 |
|
c == CHAR_HT || c == CHAR_NL || c == CHAR_FF || c == CHAR_CR; |
| 1697 |
|
break; |
| 1698 |
|
|
| 1699 |
|
case PT_PXSPACE: /* POSIX space */ |
| 1700 |
|
OK = _pcre_ucp_gentype[prop->chartype] == ucp_Z || |
| 1701 |
|
c == CHAR_HT || c == CHAR_NL || c == CHAR_VT || |
| 1702 |
|
c == CHAR_FF || c == CHAR_CR; |
| 1703 |
|
break; |
| 1704 |
|
|
| 1705 |
|
case PT_WORD: |
| 1706 |
|
OK = _pcre_ucp_gentype[prop->chartype] == ucp_L || |
| 1707 |
|
_pcre_ucp_gentype[prop->chartype] == ucp_N || |
| 1708 |
|
c == CHAR_UNDERSCORE; |
| 1709 |
|
break; |
| 1710 |
|
|
| 1711 |
/* Should never occur, but keep compilers from grumbling. */ |
/* Should never occur, but keep compilers from grumbling. */ |
| 1712 |
|
|