On Sat Feb 04 17:00:57 2006, jonathan wrote:
> Hi,
> 
> Here's an example of what I'm pretty sure is a bug.
> 
> .sub main :main
> newclass $P0, "Parent"
> push_eh handler
> $P2 = new "Parent"
> print "not "
> handler:
> print "ok\n"
> end
> .end
> 
> .namespace ["Parent"]
> .sub __init :method
> $P0 = class self
> $S0 = classname $P0
> if $S0 != "Parent" goto INIT_OK
> $P1 = new .Exception
> $P1["_message"] = "Can not instantiate an interface!"
> throw $P1
> INIT_OK:
> .end
> 
> I would expect this code to have the output:
> 
> ok
> 
> However, it actually outputs:
> 
> ok
> not ok
> 
> Thanks,
> 
> Jonathan

The pir has been updated, test added, and this issue is now being tracked in 

https://trac.parrot.org/parrot/ticket/1151

Thanks for the report!

-- 
Will "Coke" Coleda
_______________________________________________
http://lists.parrot.org/mailman/listinfo/parrot-dev

Reply via email to