Mercurial > octave
comparison scripts/miscellaneous/unpack.m @ 28087:9cb04a9e81ec
rmdir: throw an error if operation fails and nargout == 0 (bug #57830).
* dirfns.cc (Frmdir): Change DEFMETHODX macro invocation to include nargout variable.
Check nargout, and for cases where "nargout == 0" and "status" indicates failure,
throw an error. For cases where "nargout > 0", return 3-value octave_value_list
in variable "retval".
* file-io.cc, gzip.cc, dir.m, isfolder.m, mkdir.m, run.m, tar.m,
unpack.m, zip.m, pathdef.m, savepath.m, configure_make.m, install.m,
uninstall.m, getpref.m, setpref.m, pkg.tst, publish.tst, system.tst:
Change calls from "rmdir" to "sts = rmdir" so that an error is not
unecessarily thrown in BIST tests and other clean up code.
| author | Rik <rik@octave.org> |
|---|---|
| date | Mon, 17 Feb 2020 20:02:18 -0800 |
| parents | a4268efb7334 |
| children | 28de41192f3c |
comparison
equal
deleted
inserted
replaced
| 28086:32af6bb2a120 | 28087:9cb04a9e81ec |
|---|---|
| 370 %! endif | 370 %! endif |
| 371 %! unwind_protect_cleanup | 371 %! unwind_protect_cleanup |
| 372 %! unlink (filename); | 372 %! unlink (filename); |
| 373 %! unlink ([filename ".orig"]); | 373 %! unlink ([filename ".orig"]); |
| 374 %! confirm_recursive_rmdir (false, "local"); | 374 %! confirm_recursive_rmdir (false, "local"); |
| 375 %! rmdir (dirname, "s"); | 375 %! sts = rmdir (dirname, "s"); |
| 376 %! end_unwind_protect | 376 %! end_unwind_protect |
| 377 %! unwind_protect_cleanup | 377 %! unwind_protect_cleanup |
| 378 %! ## Restore environment variables TMPDIR, TMP | 378 %! ## Restore environment variables TMPDIR, TMP |
| 379 %! for i = 1:numel (envvar) | 379 %! for i = 1:numel (envvar) |
| 380 %! if (isempty (envdir{i})) | 380 %! if (isempty (envdir{i})) |