[Octave-bug-tracker] [bug #65312] "__run_test_suite__" ran in GUI hangs Octave in some configurations

[Torsten Lilge]

Follow-up Comment #40, bug#65312 (group octave):

__run_test_suite__ shows normal performance. However, there is a failed test
for "run", although I do not think this is related to the patch. It only
occurs during and after __run_test_suit__, not after a fresh start of Octave.


>> test run
***** test
 path_orig = path ();
 tmp_dir = tempname ();
 test_function = fullfile (tmp_dir, "tf.m");
 unwind_protect
   mkdir (tmp_dir);
   fid = fopen (test_function, "w");
   fprintf (fid, "function tf ()\n");
   fprintf (fid, "  addpath ('%s');\n", tmp_dir);
   fprintf (fid, "endfunction\n");
   fclose (fid);
   ## Check if temporary directory is on the loadpath.
   ## Function 'dir_in_loadpath' is broken for this use case, so code a test.
   dirs = strsplit (path (), pathsep ());
   tstval1 = any (is_same_file (tmp_dir, dirs));
   run (test_function);
   dirs = strsplit (path (), pathsep ());
   tstval2 = any (is_same_file (tmp_dir, dirs));
   assert (tstval1, false);
   assert (tstval2, true);
 unwind_protect_cleanup
   unlink (test_function);
   sts = rmdir (tmp_dir);
   path (path_orig);
 end_unwind_protect
!!!!! test failed
ASSERT errors for:  assert (tstval2,true)

  Location  |  Observed  |  Expected  |  Reason
     ()           0            1         Abs err 1 exceeds tol 0 by 1




    _______________________________________________________

Reply to this item at:

  <https://savannah.gnu.org/bugs/?65312>

_______________________________________________
Message sent via Savannah
https://savannah.gnu.org/