Mercurial > octave-nkf

diff scripts/general/isdir.m @ 12795:9e7ebbaf69ff

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
codesprint: new tests for files in scripts/general directory * bitget.m, bitset.m, colon.m, common_size.m, flipdim.m, isdir.m, nextpow2.m, postpad.m, prepad.m, rat.m, rotdim.m: New tests.
author John W. Eaton <jwe@octave.org>
date Sat, 16 Jul 2011 12:46:22 -0400
parents 132c89bb44e3
children 72c96de7a403
line wrap: on
line diff
--- a/scripts/general/isdir.m	Sat Jul 16 09:45:31 2011 -0700
+++ b/scripts/general/isdir.m	Sat Jul 16 12:46:22 2011 -0400
@@ -31,3 +31,9 @@
   retval = (exist (f, "dir") == 7);
 
 endfunction
+
+%!error isdir ();
+%!error isdir (1, 2);
+
+%!assert (isdir (pwd ()));
+%!assert (! isdir ("this is highly unlikely to be a directory name"));