Are these automatic mails valuable? I suspect they're jamming up RT.
Unless I'm missing something.
xoxo,
Andy
.
Begin forwarded message:
From: kyl...@gmail.com
Date: July 28, 2009 8:20:07 PM CDT
To: perl6-bugs-follo...@perl.org
Subject: [perl #64080] tests available
This is an automatically generated mail to inform you that tests are
now available in t/spec/S02-names_and_variables/perl.t
commit 31c7bee223f2343bb87ca5e8d28476a3787e71d5
Author: kyle <k...@c213334d-75ef-0310-aa23-eaa082d1ae64>
Date: Wed Jul 29 01:19:01 2009 +0000
[t/spec] Test for RT #64080 (may be misplaced)
git-svn-id: http://svn.pugscode.org/p...@27789 c213334d-75ef-0310-
aa23-eaa082d1ae64
diff --git a/t/spec/S02-names_and_variables/perl.t b/t/spec/S02-
names_and_variables/perl.t
index 667c4e1..85f9c92 100644
--- a/t/spec/S02-names_and_variables/perl.t
+++ b/t/spec/S02-names_and_variables/perl.t
@@ -55,7 +55,7 @@ my @tests = (
[ { :a(1) }, { :b(2), :c(3) } ],
);
-plan 14 + 2...@tests;
+plan 17 + 2...@tests;
#?pugs emit force_todo 8, 45..50, 94, 96;
#?pugs emit unless $?PUGS_BACKEND eq "BACKEND_PUGS" {
@@ -185,3 +185,14 @@ plan 14 + 2...@tests;
is @reconstituted, @original,
"eval of .perl returns original for '$dehydrated'";
}
+
+# RT #64080
+{
+ my %h;
+ lives_ok { %h<a> = [%h<a>] },
+ 'can assign list with new hash element to itself';
+ #?rakudo skip 'RT #64080'
+ lives_ok { %h<a>.perl }, 'can take .perl from hash element';
+ #?rakudo todo 'RT #64080'
+ ok %h<a> !=== %h<a>[0], 'hoa does not refer to hash element';
+}
--
Andy Lester => a...@petdance.com => www.theworkinggeek.com => AIM:petdance
