| 2026 |
|
|
| 2027 |
case ESC_W: |
case ESC_W: |
| 2028 |
return item <= 127 && (cd->ctypes[item] & ctype_word) != 0; |
return item <= 127 && (cd->ctypes[item] & ctype_word) != 0; |
| 2029 |
|
|
| 2030 |
case ESC_h: |
case ESC_h: |
| 2031 |
case ESC_H: |
case ESC_H: |
| 2032 |
switch(item) |
switch(item) |
| 2053 |
return -next != ESC_h; |
return -next != ESC_h; |
| 2054 |
default: |
default: |
| 2055 |
return -next == ESC_h; |
return -next == ESC_h; |
| 2056 |
} |
} |
| 2057 |
|
|
| 2058 |
case ESC_v: |
case ESC_v: |
| 2059 |
case ESC_V: |
case ESC_V: |
| 2060 |
switch(item) |
switch(item) |
| 2069 |
return -next != ESC_v; |
return -next != ESC_v; |
| 2070 |
default: |
default: |
| 2071 |
return -next == ESC_v; |
return -next == ESC_v; |
| 2072 |
} |
} |
| 2073 |
|
|
| 2074 |
default: |
default: |
| 2075 |
return FALSE; |
return FALSE; |
| 2093 |
|
|
| 2094 |
case OP_NOT_HSPACE: |
case OP_NOT_HSPACE: |
| 2095 |
return next == -ESC_h; |
return next == -ESC_h; |
| 2096 |
|
|
| 2097 |
/* Can't have \S in here because VT matches \S (Perl anomaly) */ |
/* Can't have \S in here because VT matches \S (Perl anomaly) */ |
| 2098 |
case OP_VSPACE: |
case OP_VSPACE: |
| 2099 |
return next == -ESC_V || next == -ESC_d || next == -ESC_w; |
return next == -ESC_V || next == -ESC_d || next == -ESC_w; |
| 2100 |
|
|
| 2101 |
case OP_NOT_VSPACE: |
case OP_NOT_VSPACE: |
| 2102 |
return next == -ESC_v; |
return next == -ESC_v; |
| 2103 |
|
|
| 2104 |
case OP_WORDCHAR: |
case OP_WORDCHAR: |
| 2105 |
return next == -ESC_W || next == -ESC_s || next == -ESC_h || next == -ESC_v; |
return next == -ESC_W || next == -ESC_s || next == -ESC_h || next == -ESC_v; |
| 2106 |
|
|
| 2107 |
case OP_NOT_WORDCHAR: |
case OP_NOT_WORDCHAR: |
| 2108 |
return next == -ESC_w || next == -ESC_d; |
return next == -ESC_w || next == -ESC_d; |
| 2109 |
|
|
| 2110 |
default: |
default: |
| 2111 |
return FALSE; |
return FALSE; |
| 2112 |
} |
} |