view test/bug-53599.tst @ 32077:ed3a18fe328a

Add more efficient functions to check for files or directories on Windows (bug #59711). * liboctave/system/lo-sysdep.h, liboctave/system/lo-sysdep.cc (octave::sys::file_exists, octave::sys::dir_exists): Calling `stat` on Windows is inefficient because it isn't a native function. Use native API functions to check if a file or directory with a given name exists.
author Markus Mützel <markus.muetzel@gmx.de>
date Fri, 05 May 2023 19:49:23 +0200
parents 332a6ccac881
children
line wrap: on
line source

%!function rval = sggval (val)
%!  global gval;
%!  if (nargin == 1)
%!    gval = val;
%!  else
%!    rval = gval;
%!  endif
%!endfunction

%!test <*53599>
%! global gval;
%! assert (isempty (gval))
%! sggval (13);
%! assert (sggval (), 13);
%! assert (gval, 13);
%! clear global gval
%! assert (sggval (), [])
%! gval = 42;
%! assert (sggval (), []);
%! clear gval
%! global gval;
%! gval = 42;
%! assert (sggval (), 42);
%! clear -global gval;  # cleanup after test