Smarter fix for \v under NFG.

Raku · Nov 3, 2015 · c7bfa55 · c7bfa55
1 parent c7104bc
commit c7bfa55
Showing 1 changed file with 1 addition and 13 deletions.
diff --git a/src/QRegex/P6Regex/Actions.nqp b/src/QRegex/P6Regex/Actions.nqp
@@ -364,21 +364,9 @@ class QRegex::P6Regex::Actions is HLL::Actions {
     }
 
     method backslash:sym<v>($/) {
-        my $qast := QAST::Regex.new( "\x[0a,0b,0c,0d,85,2028,2029]",
+        my $qast := QAST::Regex.new( "\x[0a,0b,0c,0d,85,2028,2029]\r\n",
                         :rxtype('enumcharlist'),
                         :negate($<sym> eq 'V'), :node($/) );
-        if $qast.negate {
-            $qast := QAST::Regex.new(
-                :rxtype('conj'),
-                QAST::Regex.new( :rxtype<cclass>, :name<n>, :negate(1) ),
-                $qast);
-        }
-        else {
-            $qast := QAST::Regex.new(
-                :rxtype('alt'),
-                QAST::Regex.new( :rxtype<cclass>, :name<n> ),
-                $qast);
-        }
         make $qast;
     }