Add/remove more

Raku · Mar 28, 2017 · 81e9a0e · 81e9a0e
1 parent 37d4fa0
commit 81e9a0e
Showing 1 changed file with 7 additions and 3 deletions.
diff --git a/src/vm/moar/QAST/QASTRegexCompilerMAST.nqp b/src/vm/moar/QAST/QASTRegexCompilerMAST.nqp
@@ -1001,18 +1001,22 @@ class QAST::MASTRegexCompiler {
         elsif $node.list && $node.subtype eq 'ignorecase' {
             my $lit := $!regalloc.fresh_s();
             nqp::push(@ins, op('const_s', $lit, sval(nqp::fc($node[0]))));
+#?if !moar
             unless nqp::existskey(%!reg, 'haystackfc') {
                 %!reg<haystackfc> := $!regalloc.fresh_s();
             }
+#?endif
             my $no_need_lc := label();
+#?if !moar
             nqp::push(@ins, op('isnull_s', $ireg0, %!reg<haystackfc>));
-            nqp::push(@ins, op('unless_i', $ireg0, $no_need_lc));
-#?if moar
-            #nqp::push(@ins, op('fc', %!reg<haystackfc>, %!reg<tgt>));
 #?endif
+            nqp::push(@ins, op('unless_i', $ireg0, $no_need_lc));
+# Unless we have the indexic_s op availible we must first foldcase the string
+# before we can use index_s on the fc'd string
 #?if !moar
             nqp::push(@ins, op('fc', %!reg<haystackfc>, %!reg<tgt>));
 #?endif
+            # Not sure what this is
             nqp::push(@ins, $no_need_lc);
 #?if moar
             nqp::push(@ins, op('indexic_s', %!reg<pos>, %!reg<tgt>, $lit, %!reg<pos>));