# New Ticket Created by Brian Carpenter # Please include the string: [perl #129073] # in the subject line of all future correspondence about this issue. # <URL: https://rt.perl.org/Ticket/Display.html?id=129073 > Perl v5.25.4-10-g8d168aa ./perl -e '%{p{};sub p}()' perl: perly.y:791: int Perl_yyparse(int): Assertion `( (((PL_curcop == &PL_compiling ? PL_compiling.cop_hints : PL_curcop->cop_hints) & 0x1c000000) >> 26) == (0x1c000000 >> 26) && (((PL_curcop == &PL_compiling ? PL_compiling.cop_hints : PL_curcop->cop_hints) & 0x00020000) ? Perl_feature_is_enabled( ("" "signatures" ""), (sizeof("signatures")-1)) : (0)) )' failed. #0 0x00007ffff6cf2067 in __GI_raise (sig=sig@entry=6) at ../nptl/sysdeps/unix/sysv/linux/raise.c:56 #1 0x00007ffff6cf3448 in __GI_abort () at abort.c:89 #2 0x00007ffff6ceb266 in __assert_fail_base (fmt=0x7ffff6e24238 "%s%s%s:%u: %s%sAssertion `%s' failed.\n%n", assertion=assertion@entry=0xd6cd00 <.str50> "( (((PL_curcop == &PL_compiling ? PL_compiling.cop_hints : PL_curcop->cop_hints) & 0x1c000000) >> 26) == (0x1c000000 >> 26) && (((PL_curcop == &PL_compiling ? PL_compiling.cop_hints : PL_curcop->cop_h"..., file=file@entry=0xd72f50 "perly.y", line=line@entry=791, function=function@entry=0xd6c9a0 <__PRETTY_FUNCTION__.Perl_yyparse> "int Perl_yyparse(int)") at assert.c:92 #3 0x00007ffff6ceb312 in __GI___assert_fail ( assertion=0xd6cd00 <.str50> "( (((PL_curcop == &PL_compiling ? PL_compiling.cop_hints : PL_curcop->cop_hints) & 0x1c000000) >> 26) == (0x1c000000 >> 26) && (((PL_curcop == &PL_compiling ? PL_compiling.cop_hints : PL_curcop->cop_h"..., file=0xd72f50 "perly.y", line=791, function=0xd6c9a0 <__PRETTY_FUNCTION__.Perl_yyparse> "int Perl_yyparse(int)") at assert.c:101 #4 0x00000000006b9683 in Perl_yyparse (gramtype=<optimized out>) at perly.y:791 #5 0x000000000059c502 in S_parse_body (env=<optimized out>, xsinit=<optimized out>) at perl.c:2373 #6 0x000000000059289d in perl_parse (my_perl=<optimized out>, xsinit=<optimized out>, argc=<optimized out>, argv=<optimized out>, env=<optimized out>) at perl.c:1689 #7 0x00000000004de836 in main (argc=<optimized out>, argv=<optimized out>, env=<optimized out>) at perlmain.c:121