id,summary,reporter,owner,description,type,status,priority,milestone,component,version,severity,resolution,keywords,cc,lang,patch,platform
1151,Exception thrown from constructor leads to oddness,coke,,"This code should generate:

{{{
ok #test exception from init vtable
}}}

but instead generates 
{{{
ok #test exception from init vtable
not No handler to delete.
}}}

{{{
.sub main :main
.local pmc type
newclass type, 'Parent'

.local pmc obj, exception
.local string message
message = 'no error'
push_eh handler
obj = new 'Parent'
print 'not '
pop_eh
goto finally

handler:
.get_results(exception)
pop_eh
message = exception

finally:
print ""ok #""
say message
.end

.namespace ['Parent']

.sub 'init' :vtable
die 'test exception from init vtable'
.end
}}}

Originally opened as http://rt.perl.org/rt3/Ticket/Display.html?id=38432
",bug,closed,normal,,none,trunk,medium,duplicate,,,,,