unlink => remove

Author: scivision

+stdlib/is_mex_fun.m

@@ -2,4 +2,6 @@
 
 function y = is_mex_fun(name)
   y = endsWith(which(name), mexext());
-end
+end
+
+%!testif 0

+stdlib/unlink.m renamed to +stdlib/remove.m

@@ -1,11 +1,11 @@
-%% UNLINK delete file or empty directory
+%% REMOVE delete file or empty directory
 % optional: mex
 %
 % Matlab or GNU Octave delete() has trouble with not being able to delete
 % open files on Windows. This function overcomes that limitation by returning
 % a boolean success status.
 
-function ok = unlink(apath)
+function ok = remove(apath)
 arguments
   apath {mustBeTextScalar}
 end

+stdlib/resolve.m

@@ -17,4 +17,4 @@
 
 end
 
-%!assert (resolve(''), stdlib.posix(pwd()))
+%!testif 0

buildfile.m

@@ -207,7 +207,7 @@ function build_exe(context)
 
 srcs = {
 "src/is_absolute.cpp", ...
-"src/unlink.cpp", ...
+"src/remove.cpp", ...
 ["src/is_admin.cpp", "src/admin_fs.cpp"] ...
 "src/is_char_device.cpp", ...
 ["src/normalize.cpp", normal], ...

octave_build.m

@@ -24,9 +24,9 @@ function octave_build(overwrite)
 };
 
 % need this for loop below
-unlink_bin = fullfile(t, "unlink.oct");
-if ~isfile(unlink_bin)
-  mkoctfile(fullfile(d, "unlink.cpp"), ["-I", inc], "--output", unlink_bin)
+remove_bin = fullfile(t, "remove.oct");
+if ~isfile(remove_bin)
+  mkoctfile(fullfile(d, "remove.cpp"), ["-I", inc], "--output", remove_bin)
 end
 
 %% build C+ Octave
@@ -41,7 +41,7 @@ function octave_build(overwrite)
 
   disp(["mkoctfile: ", src, " => ", bin])
   if isfile(bin)
-    assert(stdlib.unlink(bin))
+    assert(stdlib.remove(bin))
   end
   mkoctfile(src, ["-I", inc], "--output", bin)
 end

src/octave/unlink.cpp

@@ -4,7 +4,7 @@
 #include <filesystem>
 
 
-DEFUN_DLD (unlink, args, nargout,
+DEFUN_DLD (remove, args, nargout,
            "delete file or empty directory")
 {
   if (args.length() != 1){

test/TestMex.m

@@ -24,36 +24,36 @@ function test_is_admin(tc)
 end
 
 
-function test_unlink_file(tc)
-tc.assumeTrue(isfile(fileparts(mfilename("fullpath")) + "/../+stdlib/unlink." + mexext))
+function test_remove_file(tc)
+tc.assumeTrue(isfile(fileparts(mfilename("fullpath")) + "/../+stdlib/remove." + mexext))
 
 d = tc.createTemporaryFolder();
 
 f = tempname(d);
 
-tc.verifyFalse(stdlib.unlink(f), "should not succeed at unlinking non-existant path")
+tc.verifyFalse(stdlib.remove(f), "should not succeed at removing non-existant path")
 
 tc.assumeTrue(stdlib.touch(f))
-tc.verifyTrue(stdlib.unlink(f), "failed to unlink file")
+tc.verifyTrue(stdlib.remove(f), "failed to remove file")
 end
 
 
-function test_unlink_empty_dir(tc)
-tc.assumeTrue(isfile(fileparts(mfilename("fullpath")) + "/../+stdlib/unlink." + mexext))
+function test_remove_empty_dir(tc)
+tc.assumeTrue(isfile(fileparts(mfilename("fullpath")) + "/../+stdlib/remove." + mexext))
 
 d = tc.createTemporaryFolder();
 
-tc.verifyTrue(stdlib.unlink(d), "failed to unlink empty directory")
+tc.verifyTrue(stdlib.remove(d), "failed to remove empty directory")
 end
 
 
-function test_unlink_recursive(tc)
-tc.assumeTrue(isfile(fileparts(mfilename("fullpath")) + "/../+stdlib/unlink." + mexext))
+function test_remove_recursive(tc)
+tc.assumeTrue(isfile(fileparts(mfilename("fullpath")) + "/../+stdlib/remove." + mexext))
 
 d = tc.createTemporaryFolder();
 
 tc.assumeTrue(stdlib.touch(fullfile(d, "junk.txt")))
-tc.verifyFalse(stdlib.unlink(d), "should not unlink directory recursively")
+tc.verifyFalse(stdlib.remove(d), "should not remove directory recursively")
 end
 
 end