test for RT #75302

Raku · Oct 1, 2011 · 584c1a8 · 584c1a8
1 parent 7b0b34d
commit 584c1a8
Showing 1 changed file with 10 additions and 1 deletion.
diff --git a/S06-traits/is-copy.t b/S06-traits/is-copy.t
@@ -4,7 +4,7 @@ use Test;
 # L<S06/"Parameter traits"/"=item is copy">
 # should be moved with other subroutine tests?
 
-plan 20;
+plan 21;
 
 {
   sub foo($a is copy) {
@@ -90,5 +90,14 @@ plan 20;
     lives_ok { g() }, 'can call a sub with an optional "is copy" hash param';
 }
 
+# RT #75302
+{
+    sub h($x is copy) {
+        $x = 'abc';
+        $x
+    }
+    is h(*), 'abc', 'can re-assign to "is copy" parameter that held a Whatever';
+}
+
 
 # vim: ft=perl6