id	summary	reporter	owner	description	type	status	priority	milestone	component	version	severity	resolution	keywords	cc	lang	patch	platform
484	illegal instruction/segfault with Timer PMC	coke	whiteknight	"{{{
    .include 'timer.pasm'                   # for the timer constants

    .sub expired
       say 'Timer has expired!'
       exit 1
    .end

    .sub main :main
       $P0 = new 'Timer'
       $P1 = get_global ""expired""

       $P0[.PARROT_TIMER_HANDLER] = $P1    # call sub in $P1 when timer goes off
       $P0[.PARROT_TIMER_SEC]     = 2      # trigger in 10 seconds
       $P0[.PARROT_TIMER_REPEAT]  = -1     # repeat indefinitely
       $P0[.PARROT_TIMER_RUNNING] = 1      # start timer immediately
       set_global ""timer"", $P0             # keep the timer around

       $I0 = 0
    loop:
       print $I0
       say "": running...""
       inc $I0
       sleep 1                             # wait a second
       goto loop
    .end
}}}

This generates an illegal instruction. Changing the -1 to a positive one, works as expected."	bug	closed	normal		none		medium	fixed