summaryrefslogtreecommitdiff
path: root/regex.c
diff options
context:
space:
mode:
authormatz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2000-05-17 06:33:50 +0000
committermatz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2000-05-17 06:33:50 +0000
commit35e731649da88fda916509eb1cb0a745d772f21c (patch)
tree08681d28d0e918cc08444eefd241ed639fdb8bd4 /regex.c
parent133ff3421a9867ec49a23df97aba3db63fc78755 (diff)
downloadruby-35e731649da88fda916509eb1cb0a745d772f21c.tar.gz
thread problems
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@696 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'regex.c')
-rw-r--r--regex.c40
1 files changed, 40 insertions, 0 deletions
diff --git a/regex.c b/regex.c
index 2f9739ac11..c7d307c969 100644
--- a/regex.c
+++ b/regex.c
@@ -352,6 +352,8 @@ enum regexpcode
casefold_off, /* Turn off casefold flag. */
posix_on, /* Turn on POSIXified line match (match with newlines). */
posix_off, /* Turn off POSIXified line match. */
+ mline_on, /* Turn on multi line match (match with newlines). */
+ mline_off, /* Turn off multi line match. */
start_nowidth, /* Save string point to the stack. */
stop_nowidth, /* Restore string place at the point start_nowidth. */
pop_and_fail, /* Fail after popping nowidth entry from stack. */
@@ -772,6 +774,14 @@ print_partial_compiled_pattern(start, end)
printf("/posix_off");
break;
+ case mline_on:
+ printf("/mline_on");
+ break;
+
+ case mline_off:
+ printf("/mline_off");
+ break;
+
case start_nowidth:
EXTRACT_NUMBER_AND_INCR (mcnt, p);
printf("/start_nowidth//%d", mcnt);
@@ -1027,6 +1037,8 @@ calculate_must_string(start, end)
case stop_paren:
case posix_on:
case posix_off:
+ case mline_on:
+ case mline_off:
break;
case charset:
@@ -1689,6 +1701,18 @@ re_compile_pattern(pattern, size, bufp)
BUFPUSH(posix_on);
}
break;
+ case 'm':
+ if (negative) {
+ if (options&RE_OPTION_MULTILINE) {
+ options &= ~RE_OPTION_MULTILINE;
+ BUFPUSH(mline_off);
+ }
+ }
+ else if (!(options&RE_OPTION_MULTILINE)) {
+ options |= RE_OPTION_MULTILINE;
+ BUFPUSH(mline_on);
+ }
+ break;
case 'i':
if (negative) {
if (options&RE_OPTION_IGNORECASE) {
@@ -1802,6 +1826,9 @@ re_compile_pattern(pattern, size, bufp)
if ((options ^ stackp[-1]) & RE_OPTION_POSIXLINE) {
BUFPUSH((options&RE_OPTION_POSIXLINE)?posix_off:posix_on);
}
+ if ((options ^ stackp[-1]) & RE_OPTION_MULTILINE) {
+ BUFPUSH((options&RE_OPTION_POSIXLINE)?mline_off:mline_on);
+ }
pending_exact = 0;
if (fixup_alt_jump) {
/* Push a dummy failure point at the end of the
@@ -2765,6 +2792,11 @@ re_compile_fastmap(bufp)
options ^= RE_OPTION_POSIXLINE;
continue;
+ case mline_on:
+ case mline_off:
+ options ^= RE_OPTION_MULTILINE;
+ continue;
+
case endline:
if (TRANSLATE_P())
fastmap[translate['\n']] = 1;
@@ -4105,6 +4137,14 @@ re_match(bufp, string_arg, size, pos, regs)
options &= ~RE_OPTION_POSIXLINE;
continue;
+ case mline_on:
+ options |= RE_OPTION_MULTILINE;
+ continue;
+
+ case mline_off:
+ options &= ~RE_OPTION_MULTILINE;
+ continue;
+
case wordbound:
if (AT_STRINGS_BEG(d)) {
if (IS_A_LETTER(d)) break;