Update *MARK handling to be more like Perl.

git-svn-id: svn://vcs.exim.org/pcre/code/trunk@771 2f5784b3-3f2a-0410-8824-cb99058d5e15

1 files changed, 4 insertions, 0 deletions

diff --git a/perltest.pl b/perltest.pl
index ccddd64..d81a6c4 100755
--- a/perltest.pl
+++ b/perltest.pl
@@ -111,6 +111,10 @@ for (;;)
 
   $pattern =~ s/S(?=[a-zA-Z]*$)//g;
 
+  # Remove /Y from a pattern (asks pcretest to disable PCRE optimization)
+
+  $pattern =~ s/Y(?=[a-zA-Z]*$)//;
+
   # Check that the pattern is valid
 
   eval "\$_ =~ ${pattern}";