Mercurial > octave
view test/bug-64620/bug_64620_2.m @ 33608:5fba13104493 bytecode-interpreter tip
maint: merge default to bytecode-interpreter.
author | Nicholas R. Jankowski <jankowski.nicholas@gmail.com> |
---|---|
date | Sat, 18 May 2024 22:40:00 -0400 |
parents | 8e4f14837db2 |
children |
line wrap: on
line source
function bug_64620_2() % Two levels of nested nesting global cdef_alive_objects_cntr = 0; cdef_alive_objects_cntr = 0; h = sub_returns_nested_fn2; h (); h = 3; % Clear handle, triggers dtors assert (cdef_alive_objects_cntr == 0); end function h1 = sub_returns_nested_fn2 c2 = cdef_counts_self; function h2 = nested_fn1 c3 = cdef_counts_self; function nested_fn2 c4 = cdef_counts_self; end h2 = @nested_fn2; end h1 = nested_fn1 (); end