From @geeknik

sub y();sub y():y() causes an assertion failure in Perl_newATTRSUB_x (op.c:8410). This bug was found using American Fuzzy Lop. Perl v5.23.6 (v5.23.5-113-g406d554) was compiled as follows:

./Configure -des -Dusedevel -DDEBUGGING -Dcc=afl-gcc -Doptimize=-O2\ -g && AFL_HARDEN=1 make -j6

valgrind -q ~/perl/perl test07
perl: op.c:8410: Perl_newATTRSUB_x: Assertion `block' failed.
Aborted

perl: op.c:8410: Perl_newATTRSUB_x: Assertion `block' failed.

Program received signal SIGABRT, Aborted.
0x00007ffff6d90165 in *__GI_raise (sig=<optimized out>) at ../nptl/sysdeps/unix/sysv/linux/raise.c:64
64 ../nptl/sysdeps/unix/sysv/linux/raise.c: No such file or directory.
(gdb) bt
#0 0x00007ffff6d90165 in *__GI_raise (sig=<optimized out>) at ../nptl/sysdeps/unix/sysv/linux/raise.c:64
#1 0x00007ffff6d933e0 in *__GI_abort () at abort.c:92
#2 0x00007ffff6d89311 in *__GI___assert_fail (assertion=assertion@entry=0xe812e4 "block",
file=<optimized out>, file@entry=0xf50f22 "op.c", line=line@entry=8410,
function=function@entry=0xe96010 "Perl_newATTRSUB_x") at assert.c:81
#3 0x00000000004d92a5 in Perl_newATTRSUB_x (floor=39, o=0x11c8b08, proto=0x11c8ac8, attrs=0x11c8f28,
block=0x0, o_is_gv=o_is_gv@entry=false) at op.c:8410
#4 0x0000000000662984 in Perl_yyparse (gramtype=gramtype@entry=258) at perly.y:294
#5 0x000000000052e625 in S_parse_body (env=env@entry=0x0, xsinit=xsinit@entry=0x42e190 <xs_init>)
at perl.c:2312
#6 0x0000000000534737 in perl_parse (my_perl=<optimized out>, xsinit=xsinit@entry=0x42e190 <xs_init>,
argc=<optimized out>, argv=<optimized out>, env=env@entry=0x0) at perl.c:1634
#7 0x000000000042dda8 in main (argc=2, argv=0x7fffffffe668, env=0x7fffffffe680) at perlmain.c:114

Perl_newATTRSUB_x: Assertion `block' failed (op.c:8410) #15081

Description

Metadata

Metadata

Assignees

Labels

Type

Projects

Milestone

Relationships

Development

Issue actions