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