>>>>> processing /opt/octave-8.4.0/share/octave/8.4.0/etc/tests/fixed/bug-40117.tst ***** test <*40117> unwind_protect tmp_dir = tempname (); mkdir (tmp_dir); a_dir = fullfile (tmp_dir, "a"); a_private_dir = fullfile (a_dir, "private"); mkdir (a_dir); mkdir (a_private_dir); __mktestfun_40117__ (fullfile (a_dir, "main_40117.m"), "function r = main_40117 ()", " r = p1_40117 ();", "endfunction"); __mktestfun_40117__ (fullfile (a_private_dir, "p1_40117.m"), "function r = p1_40117 ()", " r = p2_40117 ();", "endfunction"); __mktestfun_40117__ (fullfile (a_private_dir, "p2_40117.m"), "function r = p2_40117 ()", " r = 'a_p2_40117';", "endfunction"); addpath (a_dir); assert (main_40117 (), "a_p2_40117"); ## Update the secondary private function, attempting to avoid ## filesystem timestamp resolution problems. pause (1); __mktestfun_40117__ (fullfile (a_private_dir, "p2_40117.m"), "function r = p2_40117 ()", " r = 'new function!';", "endfunction"); ## Force new functions to be found. rehash (); assert (main_40117 (), "new function!"); unwind_protect_cleanup rmpath (a_dir); confirm_recursive_rmdir (false, "local"); rmdir (tmp_dir, "s"); end_unwind_protect !!!!! regression: https://octave.org/testfailure/?40117 ASSERT errors for: assert (main_40117 (),"new function!") Location | Observed | Expected | Reason [] a_p2_40117 new function! Strings don't match