Skip to content
Browse files

added a small test case for RT #83766

  • Loading branch information...
1 parent 6e9eca5 commit b5ce7a2b97a3e44a68f1119ecb8aff8e334a7478 @timo timo committed Dec 16, 2012
Showing with 5 additions and 1 deletion.
  1. +5 −1 S05-transliteration/trans.t
View
6 S05-transliteration/trans.t
@@ -10,7 +10,7 @@ String transliteration
# L<S05/Transliteration>
-plan 58;
+plan 59;
is("ABC".trans( ('A'=>'a'), ('B'=>'b'), ('C'=>'c') ),
"abc",
@@ -292,4 +292,8 @@ is('ababab'.trans([/ab/, 'aba', 'bab', /baba/] =>
#?pugs todo
lives_ok { my @a = 1..2; @a>>.trans((1..2) => (14..15,1..2)); }, 'trans works with Cool signature';
+# RT #83766
+is((1, 2)>>.trans((1..26) => (14..26,1..13)), <14 15>, '.trans with a pair of parcels using postfix hypermetaoperator works');
+is ("!$_!" for (1, 2)>>.trans((1..26) => (14..26,1..13))), <!14! !15!>, "same with explicit for"
+
# vim: ft=perl6

0 comments on commit b5ce7a2

Please sign in to comment.
Something went wrong with that request. Please try again.