@@ -98,6 +98,7 @@ is("\x12c\x190".trans("\x12c" => "\x190"), "\x190\x190");
98
98
99
99
# should these be combined?
100
100
# ?rakudo skip 'disambiguate ranges'
101
+ # ?niecza todo
101
102
is ($ b . trans (' A..H..Z' => ' a..h..z' ), $ a ,
102
103
' ambiguous ranges combined' );
103
104
@@ -117,6 +118,7 @@ is("hello".trans("l" => ""), "heo", "can replace with empty string");
117
118
# complement, squeeze/squash, delete
118
119
119
120
# ?rakudo 2 skip 'flags'
121
+ # ?niecza 2 skip 'trans flags NYI'
120
122
is (' bookkeeper' . trans (: s, ' a..z' => ' a..z' ), ' bokeper' ,
121
123
' :s flag (squash)' );
122
124
@@ -127,6 +129,7 @@ is('ABC123DEF456GHI'.trans('A..Z' => 'x'), 'xxx123xxx456xxx',
127
129
' no flags' );
128
130
129
131
# ?rakudo 4 skip 'flags'
132
+ # ?niecza 4 skip 'trans flags NYI'
130
133
is (' ABC123DEF456GHI' . trans (: c, ' A..Z' => ' x' ),' ABCxxxDEFxxxGHI' ,
131
134
' ... with :c' );
132
135
@@ -143,6 +146,7 @@ is('Good&Plenty'.trans('len' => 'x'), 'Good&Pxxxty',
143
146
' no flags' );
144
147
145
148
# ?rakudo 5 skip 'flags'
149
+ # ?niecza 5 skip 'trans flags NYI'
146
150
is (' Good&Plenty' . trans (: s, ' len' => ' x' ,), ' Good&Pxty' ,
147
151
' squashing depends on replacement repeat, not searchlist repeat' );
148
152
@@ -188,6 +192,7 @@ is(" <>&".trans(:c, :s, ([' ', '>', '&'] =>
188
192
};
189
193
190
194
# ?rakudo skip 'closures and regexes'
195
+ # ?niecza skip 'closures and regexes'
191
196
{
192
197
# closures and regexes!
193
198
is (
@@ -207,6 +212,7 @@ is(" <>&".trans(:c, :s, ([' ', '>', '&'] =>
207
212
}
208
213
209
214
# ?rakudo skip 'tr///, feed operator not implemented'
215
+ # ?niecza skip 'Action method quote:tr not yet implemented'
210
216
{
211
217
is (eval(' "abc".trans(<== "a" => "A")' ), " Abc" ,
212
218
" you're allowed to leave off the (...) named arg parens when you use <==" );
@@ -255,6 +261,7 @@ is('ababab'.trans([/ab/, 'aba', 'bab', /baba/] =>
255
261
' longest token still holds, even between constant strings and regexes' );
256
262
257
263
# RT #83674
264
+ # ?niecza skip 'Not sure what is supposed to be going on here'
258
265
lives_ok { my @ a = 1 .. 2 ; @ a >>. trans ((1 .. 2 ) => (14 .. 15 ,1 .. 2 )); }, ' trans works with Cool signature' ;
259
266
260
267
# vim: ft=perl6
0 commit comments