Fix for !BACKREF, which fixes test 42.

Raku · Jan 18, 2012 · baf0b9b · baf0b9b
1 parent 76377d0
commit baf0b9b
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/QRegex/Cursor.nqp b/src/QRegex/Cursor.nqp
@@ -189,7 +189,8 @@ role NQPCursorRole {
     method !BACKREF($name) {
         my $cur := self."!cursor_start"();
         my $n := $!cstack ?? nqp::elems($!cstack) - 1 !! -1;
-        $n-- while $n >= 0 && nqp::getattr($!cstack[$n], $?CLASS, '$!name') ne $name;
+        $n-- while $n >= 0 && (nqp::isnull(nqp::getattr($!cstack[$n], $?CLASS, '$!name')) ||
+                               nqp::getattr($!cstack[$n], $?CLASS, '$!name') ne $name);
         if $n >= 0 {
             my $subcur := $!cstack[$n];
             my $litlen := $subcur.pos - $subcur.from;