Regex compiler missed negative case of literals.

This was the root cause of the 46-charspec.t parsing bug.
jnthn · Feb 28, 2013 · ce3ee72 · ce3ee72
1 parent 7d43858
commit ce3ee72
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/QAST/JASTCompiler.nqp b/lib/QAST/JASTCompiler.nqp
@@ -4006,7 +4006,7 @@ class QAST::CompilerJAST {
             $il.append(JAST::Instruction.new( :op('invokevirtual'),
                 $TYPE_STR, 'equals', 'Z', $TYPE_OBJ ));
         }
-        $il.append(JAST::Instruction.new( :op('ifeq'), %*REG<fail> ));
+        $il.append(JAST::Instruction.new( :op($node.negate ?? 'ifne' !! 'ifeq'), %*REG<fail> ));
 
         $il.append(JAST::Instruction.new( :op('lload'), %*REG<pos> ));
         $il.append(JAST::PushIVal.new( :value($litlen) ));