Fix the bind test

Part of fix described in 4bf399347c If actual binding is expected, the $a needs to be is raw.
Raku · Oct 9, 2017 · 0a6daaa · 0a6daaa
1 parent 3cbeaea
commit 0a6daaa
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/S06-other/pairs-as-lvalues.t b/S06-other/pairs-as-lvalues.t
@@ -10,7 +10,7 @@ throws-like 'my $var; (key => $var) = "value"', X::Assignment::RO;
 {
     my ($a, $b);
     $b = 'b';
-    :(:$a) := \(:a($b));
+    :(:$a is raw) := \(:a($b));
     is $a, 'b', 'can bind to single pair';
     ok $a =:= $b, 'variables are bound together (?)';
 }