Mercurial > emacs
comparison src/regex.c @ 29194:fe06affca294
(at_begline_loc_p): Also recognize the \\(?:^ case
of an anchor at the beginning of a shy-group.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Thu, 25 May 2000 16:30:40 +0000 |
parents | d40a7f046efe |
children | b2c75746a989 |
comparison
equal
deleted
inserted
replaced
29193:eb1c9224a1c6 | 29194:fe06affca294 |
---|---|
3206 | 3206 |
3207 return | 3207 return |
3208 /* After a subexpression? */ | 3208 /* After a subexpression? */ |
3209 (*prev == '(' && (syntax & RE_NO_BK_PARENS || prev_prev_backslash)) | 3209 (*prev == '(' && (syntax & RE_NO_BK_PARENS || prev_prev_backslash)) |
3210 /* After an alternative? */ | 3210 /* After an alternative? */ |
3211 || (*prev == '|' && (syntax & RE_NO_BK_VBAR || prev_prev_backslash)); | 3211 || (*prev == '|' && (syntax & RE_NO_BK_VBAR || prev_prev_backslash)) |
3212 /* After a shy subexpression? */ | |
3213 || ((syntax & RE_SHY_GROUPS) && prev - 2 >= pattern | |
3214 && prev[-1] == '?' && prev[-2] == '(' | |
3215 && (syntax & RE_NO_BK_PARENS | |
3216 || (prev - 3 >= pattern && prev[-3] == '\\'))); | |
3212 } | 3217 } |
3213 | 3218 |
3214 | 3219 |
3215 /* The dual of at_begline_loc_p. This one is for $. We assume there is | 3220 /* The dual of at_begline_loc_p. This one is for $. We assume there is |
3216 at least one character after the $, i.e., `P < PEND'. */ | 3221 at least one character after the $, i.e., `P < PEND'. */ |