Mercurial > octave
view test/line-continue.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 | 5f11de0e7440 |
children | 2e484f9f1f18 |
line wrap: on
line source
######################################################################## ## ## Copyright (C) 2006-2023 The Octave Project Developers ## ## See the file COPYRIGHT.md in the top-level directory of this ## distribution or <https://octave.org/copyright/>. ## ## This file is part of Octave. ## ## Octave is free software: you can redistribute it and/or modify it ## under the terms of the GNU General Public License as published by ## the Free Software Foundation, either version 3 of the License, or ## (at your option) any later version. ## ## Octave is distributed in the hope that it will be useful, but ## WITHOUT ANY WARRANTY; without even the implied warranty of ## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ## GNU General Public License for more details. ## ## You should have received a copy of the GNU General Public License ## along with Octave; see the file COPYING. If not, see ## <https://www.gnu.org/licenses/>. ## ######################################################################## %!shared x, a, b %! x = [1,2]; %! a = 1; %! b = 2; %!test %! y = [a... # comments here ok %! b]; %! assert (y, x); ## String continuation using '\' %!assert (["abc\ %! def"], "abc def") %!test %!assert (1 == 1 %! && 2 == 2 %! || 3 == 5); %!test %! x = [1, ... %! %! ... %! %! 2]; %! y = [1;2]; %! assert (y, x); %!test %! x = [1 ,... %! 2]; %! y = [1,2]; %! assert (y, x); %!test %! x = [ 1 , ... %! 2]; %! y = [1,2]; %! assert (y, x); %!test %! x = [ 1 , ...anything after the ... is ignored %! 2]; %! y = [1,2]; %! assert (y, x);