Add a test for [R~]=. avuserow++ for spotting this.

Raku · Feb 5, 2015 · 8fce170 · 8fce170
1 parent b4b8ab1
commit 8fce170
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/S03-metaops/reverse.t b/S03-metaops/reverse.t
@@ -72,4 +72,10 @@ eval_dies_ok '("a" R~ "b") = 1', 'Cannot assign to return value of R~';
         'adequate error message on trying to metaop-reverse binding (:=)';
 }
 
+#?rakudo skip 'fails with "Unknown QAST node type NQPMu"'
+{
+    my $foo = "foo";
+    $foo [R~]= "bar";
+    is $foo, "barfoo", '[Rop]= works correctly.';
+}
 # vim: ft=perl6