Remove **<sep>

Raku · May 16, 2012 · 7df35de · 7df35de
1 parent b6d1a40
commit 7df35de
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 10 deletions.
diff --git a/src/QRegex/P6Regex/Actions.nqp b/src/QRegex/P6Regex/Actions.nqp
@@ -116,15 +116,9 @@ class QRegex::P6Regex::Actions is HLL::Actions {
 
     method quantifier:sym<**>($/) {
         my $qast;
-        if $<quantified_atom> { 
-            my $ast := $<quantified_atom>.ast;
-            $qast := QAST::Regex.new( :rxtype<quant>, :min(1), $ast);
-        }
-        else {
-            $qast := QAST::Regex.new( :rxtype<quant>, :min(+$<min>), :node($/) );
-            if ! $<max> { $qast.max(+$<min>) }
-            elsif $<max>[0] ne '*' { $qast.max(+$<max>[0]); }
-        }
+        $qast := QAST::Regex.new( :rxtype<quant>, :min(+$<min>), :node($/) );
+        if ! $<max> { $qast.max(+$<min>) }
+        elsif $<max>[0] ne '*' { $qast.max(+$<max>[0]); }
         make backmod($qast, $<backmod>);
     }
 

diff --git a/src/QRegex/P6Regex/Grammar.nqp b/src/QRegex/P6Regex/Grammar.nqp
@@ -98,7 +98,6 @@ grammar QRegex::P6Regex::Grammar is HLL::Grammar {
                        || <.panic: "Only integers or '*' allowed as range quantifier endpoint"> 
                        ] 
             ]?
-        ||  <quantified_atom>
         ]
     }