This is an automatically generated mail to inform you that tests are now 
available in t/spec/integration/real-strings.t

commit d975206783869d325cafb191330f961bc32019ac
Author: moritz <mor...@c213334d-75ef-0310-aa23-eaa082d1ae64>
Date:   Sat Sep 26 16:38:51 2009 +0000

    [t/spec] test for RT #66818, %*VM behaving weirdly
    
    git-svn-id: http://svn.pugscode.org/p...@28421 
c213334d-75ef-0310-aa23-eaa082d1ae64

diff --git a/t/spec/integration/real-strings.t 
b/t/spec/integration/real-strings.t
index a89f237..5b14597 100644
--- a/t/spec/integration/real-strings.t
+++ b/t/spec/integration/real-strings.t
@@ -1,6 +1,6 @@
 use v6;
 use Test;
-plan 10;
+plan 11;
 
 # Rakudo had a regression that
 # string returned from regexes were Parrot strings, not Perl 6 strings.
@@ -48,4 +48,12 @@ is "helo".lc.trans(("aeiou" => "AEIOU")),   'hElO', 
'.flip.trans (RT 66300)';
     is substtest("mop"), "map", '.subst works in a multi';
 }
 
+# not a "real string', but a "real hash" bug found in Rakudo:
+
+{
+    my $x = 0;
+    for %*VM.kv -> $k, $v { $x++};
+    is $x, +%*VM.keys, '%*VM.kv is self-consistent';
+}
+
 # vim: ft=perl6

Reply via email to