Mercurial > octave
comparison libinterp/corefcn/dirfns.cc @ 31019:d07218f22447
maint: Merge stable to default.
author | Markus Mützel <markus.muetzel@gmx.de> |
---|---|
date | Tue, 24 May 2022 22:36:18 +0200 |
parents | 3cb50bb91ccf 4f2f81989d50 |
children | 509ba2cc30ec |
comparison
equal
deleted
inserted
replaced
31017:3cb50bb91ccf | 31019:d07218f22447 |
---|---|
664 ## retain trailing file separator | 664 ## retain trailing file separator |
665 %!test <*62414> | 665 %!test <*62414> |
666 %! old_dir = cd (fileparts (which ("plot.m"))); | 666 %! old_dir = cd (fileparts (which ("plot.m"))); |
667 %! unwind_protect | 667 %! unwind_protect |
668 %! assert (__wglob__ ("private"), {"private"}); | 668 %! assert (__wglob__ ("private"), {"private"}); |
669 %! assert (__wglob__ ("private/"), {["private), filesep()]}); | 669 %! assert (__wglob__ ("private/"), {["private", filesep()]}); |
670 %! assert (__wglob__ ("private///"), {["private), filesep()]}); | 670 %! assert (__wglob__ ("private///"), {["private", filesep()]}); |
671 %! assert (__wglob__ ("./private"), {fullfile(".", "private")}); | 671 %! assert (__wglob__ ("./private"), {fullfile(".", "private")}); |
672 %! assert (__wglob__ ("./private/"), ... | 672 %! assert (__wglob__ ("./private/"), ... |
673 %! {[fullfile(".", "private"), filesep()]}); | 673 %! {[fullfile(".", "private"), filesep()]}); |
674 %! assert (__wglob__ ("./private///"), ... | 674 %! assert (__wglob__ ("./private///"), ... |
675 %! {[fullfile(".", "private"), filesep()]}); | 675 %! {[fullfile(".", "private"), filesep()]}); |