Enabled negated character classes inside character sets.

[SVN r31053]
2005-09-20 12:01:25 +00:00
parent 02970ab6e0
commit aea2be86a9
7 changed files with 80 additions and 19 deletions
--- a/include/boost/regex/v4/perl_matcher.hpp
+++ b/include/boost/regex/v4/perl_matcher.hpp
@ -226,6 +226,8 @@ iterator BOOST_REGEX_CALL re_is_set_member(iterator next,
   }
   if(traits_inst.isctype(col, set_->cclasses) == true)
      return set_->isnot ? next : ++next;
+   if((set_->cnclasses != 0) && (traits_inst.isctype(col, set_->cnclasses) == false))
+      return set_->isnot ? next : ++next;
   return set_->isnot ? ++next : next;
 }