Mercurial > octave

comparison libinterp/corefcn/dirfns.cc @ 31028:509ba2cc30ec

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
maint: Merge stable to default.
author Markus Mützel <markus.muetzel@gmx.de>
date Thu, 26 May 2022 13:31:57 +0200
parents d07218f22447 72786e150001
children e88a07dec498
comparison
equal deleted inserted replaced
31026:f03e1eebf46d 31028:509ba2cc30ec
563 %! cd (cwd); 563 %! cd (cwd);
564 %! sts = rmdir (tmpdir); 564 %! sts = rmdir (tmpdir);
565 %! assert (result1, {"file1"; "myfile1"}); 565 %! assert (result1, {"file1"; "myfile1"});
566 %! assert (result2, {"myfile1"}); 566 %! assert (result2, {"myfile1"});
567 %! assert (result3, {"file1"; "file2"}); 567 %! assert (result3, {"file1"; "file2"});
568
569 ## Check backslash handling on Windows
570 %!testif ; ispc ()
571 %! win_dir = getenv ("WINDIR");
572 %! assert (glob (win_dir), {win_dir});
573 %! assert (glob ([win_dir, filesep]), {[win_dir, filesep]});
574 %! win_dir2 = strrep(win_dir, filesep, '/');
575 %! assert (glob (win_dir2), {win_dir});
576 %! assert (glob ([win_dir2, '/']), {[win_dir, filesep]});
568 */ 577 */
569 578
570 DEFUN (__wglob__, args, , 579 DEFUN (__wglob__, args, ,
571 doc: /* -*- texinfo -*- 580 doc: /* -*- texinfo -*-
572 @deftypefn {} {@var{cstr} =} __wglob__ (@var{pattern}) 581 @deftypefn {} {@var{cstr} =} __wglob__ (@var{pattern})