File tree Expand file tree Collapse file tree 2 files changed +2
-2
lines changed Expand file tree Collapse file tree 2 files changed +2
-2
lines changed Original file line number Diff line number Diff line change @@ -396,7 +396,7 @@ class QRegex::P5Regex::Actions is HLL::Actions {
396
396
method flip_ast ($ qast ) {
397
397
return $ qast unless nqp ::istype($ qast , QAST ::Regex);
398
398
if $ qast . rxtype eq ' literal' {
399
- $ qast [0 ] := $ qast [0 ]. reverse ( );
399
+ $ qast [0 ] := nqp :: flip ( $ qast [0 ]);
400
400
}
401
401
elsif $ qast . rxtype eq ' concat' {
402
402
my @ tmp ;
Original file line number Diff line number Diff line change @@ -679,7 +679,7 @@ class QRegex::P6Regex::Actions is HLL::Actions {
679
679
method flip_ast ($ qast ) {
680
680
return $ qast unless nqp ::istype($ qast , QAST ::Regex);
681
681
if $ qast . rxtype eq ' literal' {
682
- $ qast [0 ] := $ qast [0 ]. reverse ( );
682
+ $ qast [0 ] := nqp :: flip ( $ qast [0 ]);
683
683
}
684
684
elsif $ qast . rxtype eq ' concat' {
685
685
my @ tmp ;
You can’t perform that action at this time.
0 commit comments