# New Ticket Created by  Moritz Lenz 
# Please include the string:  [perl #121531]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/Ticket/Display.html?id=121531 >


This test from S04-phasers/pre-post.t fails on rakudo-moar, but passes
on the two other backends:

    my $str;
    try {
        {
            PRE     { $str ~= '('; 0 }
            PRE     { $str ~= '*'; 1 }
            ENTER   { $str ~= '[' }
            $str ~= 'x';
            LEAVE   { $str ~= ']' }
            POST    { $str ~= ')'; 1 }
        }
    }
    is $str, '(', 'failing PRE runs nothing else';

Reply via email to