[range.t] add test for RT #82620 (range exposing Parrot types)

Raku · Jan 22, 2011 · b2c7760 · b2c7760
1 parent 1888ab6
commit b2c7760
Showing 1 changed file with 7 additions and 0 deletions.
diff --git a/S03-operators/range.t b/S03-operators/range.t
@@ -219,4 +219,11 @@ is (1..6 Z 'a' .. 'c').join, '1a2b3c',   'Ranges and infix:<Z>';
     isa_ok (1..$_), Range, '(..) works on Int .. Any';
 }
 
+# RT #82620
+#rakudo skip 'range leaking Parrot types'
+{
+    lives_ok {("a".."b").map({.trans(""=>"")}).perl},
+        "range doesn't leak Parrot types";
+}
+
 # # vim: ft=perl6