# New Ticket Created by Matt Diephouse # Please include the string: [perl #39988] # in the subject line of all future correspondence about this issue. # <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=39988 >
The example: .sub main :main $P0 = get_hll_global ['Foo'], 'load' $P0() $P0 = new 'Foo' push_eh catch $S0 = $P0 clear_eh say "huh?" .return() catch: say "caught" .return() .end .namespace ['Foo'] .sub load $P0 = newclass 'Foo' .end .sub __get_string :method $P0 = new .Exception throw $P0 .end Running this gives: caught No exception to pop. It should only say "caught". I'm guessing (a) that this is a result of throwing the exception in a vtable method and (b) that this is causing the "attempt to access code outside of code segment" errors in Tcl. -- Matt Diephouse