[perl #59968] [BUG] Calling Test::More sub after catching a div by zero exception segfaults

[Will Coleda]

You can't use "P0" as a register in PIR these days, you need "$P0" instead.

On Sat, Jan 31, 2009 at 7:22 PM, James Keenan via RT
<parrotbug-followup at parrotcode.org> wrote:
> Reviewing this RT today, I get a completely different problem:
>
> $ cat seg.pir
> .sub main :main
> .include 'include/test_more.pir'
>
> new P0, 'Integer'
> new P2, 'Integer'
> new P1, 'Integer'
>
> set P0, 1
> set P2, 0
>
> ok( 1, 'ready...' )
>
> push_eh handler
> P1 = P0 / P2
> ok( 0, "not caught" )
> end
> pop_eh
> handler:
> ok( 1, 'caught' ) # segfaults
> # say "ok" # no problem with this
> .end
>
>
> [li11-226:parrot] 522 $ ./parrot seg.pir
> error:imcc:'P0' is only a valid register name in PASM mode
>        in file 'seg.pir' line 4
>
> Can anyone comment?
>
> Thank you very much.
> kid51
> _______________________________________________
> http://lists.parrot.org/mailman/listinfo/parrot-dev
>



-- 
Will "Coke" Coleda