# New Ticket Created by  "Carl Mäsak" 
# Please include the string:  [perl #116691]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=116691 >


As seen on parrot-dev.

$ nom -e '(1, 3, *x* ... 233)[1..4]'
/usr/local/bin/nom: line 3:  5894 Segmentation fault
/home/masak/ours/nom-rakudo/install/bin/perl6 "$@"

$ nom -e '.say for (1, 3, *x* ... 233)[1..3]'
3
111
333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333

(cue uncomfortable laughter)

$ gdb /home/masak/ours/nom-rakudo/install/bin/perl6
GNU gdb (Ubuntu/Linaro 7.2-1ubuntu11) 7.2
Copyright (C) 2010 Free Software Foundation, Inc.
License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>
This is free software: you are free to change and redistribute it.
There is NO WARRANTY, to the extent permitted by law.  Type "show copying"
and "show warranty" for details.
This GDB was configured as "x86_64-linux-gnu".
For bug reporting instructions, please see:
<http://www.gnu.org/software/gdb/bugs/>...
Reading symbols from /home/masak/ours/nom-rakudo/install/bin/perl6...done.
(gdb) r -e '.say for (1, 3, *x* ... 233)[1..4]'
Starting program: /home/masak/ours/nom-rakudo/install/bin/perl6 -e
'.say for (1, 3, *x* ... 233)[1..4]'
[Thread debugging using libthread_db enabled]

Program received signal SIGSEGV, Segmentation fault.
0x00007ffff51896a1 in memcpy () from /lib/x86_64-linux-gnu/libc.so.6
(gdb) bt
#0  0x00007ffff51896a1 in memcpy () from /lib/x86_64-linux-gnu/libc.so.6
#1  0x00007ffff79fde3d in Parrot_str_repeat (interp=<value optimized
out>, s=0x6683508, num=6148914691236517205) at
/usr/include/bits/string3.h:52
#2  0x00007ffff7a19f6d in Parrot_repeat_s_s_i
(cur_opcode=0x7ffff0ea0e08, interp=0x60f050) at
src/ops/core_ops.c:20845
#3  0x00007ffff7a57f56 in runops_fast_core (interp=0x60f050,
runcore_unused=<value optimized out>, pc=<value optimized out>) at
src/runcore/cores.c:499
#4  0x00007ffff7a57bae in runops_int (interp=0x60f050, offset=<value
optimized out>) at src/runcore/main.c:220
#5  0x00007ffff7a4056e in runops (interp=0x60f050, offs=21585) at
src/call/ops.c:126
#6  0x00007ffff7a3bffe in Parrot_pcc_invoke_from_sig_object
(interp=0x60f050, sub_obj=<value optimized out>, call_object=<value
optimized out>)
    at src/call/pcc.c:338
#7  0x00007ffff7a30519 in Parrot_ext_call (interp=0x60f050,
sub_pmc=0x2ac6f98, signature=<value optimized out>) at
src/extend.c:158
#8  0x00007ffff7b0fe88 in Parrot_Task_invoke (interp=0x60f050,
_self=0x2ac6930, next=0x0) at src/pmc/task.c:166
#9  0x00007ffff7a3bfac in Parrot_pcc_invoke_from_sig_object
(interp=0x60f050, sub_obj=0x2ac6930, call_object=0x2ac6fc0) at
src/call/pcc.c:330
#10 0x00007ffff7a30519 in Parrot_ext_call (interp=0x60f050,
sub_pmc=0x2ac6930, signature=<value optimized out>) at
src/extend.c:158
#11 0x00007ffff7a5c0ad in Parrot_cx_outer_runloop (interp=0x60f050) at
src/scheduler.c:147
#12 0x00007ffff7a5c13d in Parrot_cx_begin_execution (interp=0x60f050,
main=0x707e28, argv=0x6f57f0) at src/scheduler.c:111
#13 0x00007ffff7a63c15 in Parrot_pf_execute_bytecode_program
(interp=0x60f050, pbc=<value optimized out>, args=0x6f57f0) at
src/packfile/api.c:2829
#14 0x00007ffff7a2bda2 in Parrot_api_run_bytecode
(interp_pmc=0x6d85e0, pbc=0x686558, args=0x6f57f0) at
src/embed/bytecode.c:161
#15 0x0000000000401450 in main (argc=3, argv=0x7fffffffe258) at perl6.c:936
(gdb) quit

Reply via email to