This is an automatically generated mail to inform you that tests are now
available in t/spec/S06-signature/slurpy-params.t
commit c35c5ea64d78fe461750068f4c03f16727f16c1a
Author: bbkr <b...@c213334d-75ef-0310-aa23-eaa082d1ae64>
Date: Mon Jun 28 16:37:47 2010 +0000
t[t/spec/S06-signature/slurpy-params.t] tests for RT #72600 if statements
clobber @_ in Rakudo
git-svn-id: http://svn.pugscode.org/p...@31482
c213334d-75ef-0310-aa23-eaa082d1ae64
diff --git a/t/spec/S06-signature/slurpy-params.t
b/t/spec/S06-signature/slurpy-params.t
index f5d3440..86334b2 100644
--- a/t/spec/S06-signature/slurpy-params.t
+++ b/t/spec/S06-signature/slurpy-params.t
@@ -312,6 +312,17 @@ eval_dies_ok 'sub rt65324(*...@x, $oops) { say $oops }',
is @c[0], 'a', 'slurpy is copy-array works fine, thank you';
}
+# RT #72600
+{
+ sub A (*...@_) {
+ is @_, [5, 4], 'slurpy @_ contains proper values';
+ if 1 {
+ is @_, [5, 4], 'slurpy @_ values not clobbered by if statement';
+ }
+ };
+ A(5, 4);
+}
+
done_testing;
# vim: ft=perl6