test: stricter, simpler check

Author: scivision

test/TestDisk.m

@@ -60,9 +60,12 @@ function test_disk_capacity(tc, Ps, disk_capacity_fun)
 
 
 function test_hard_link_count(tc, hl_fun)
+fname = "hard_link_count";
+n = "stdlib." + hl_fun + "." + fname;
+h = str2func("stdlib." + fname);
+tc.assertNotEmpty(which(n))
 try
-  c = stdlib.hard_link_count(mfilename("fullpath") + ".m", hl_fun);
-  tc.verifyGreaterThanOrEqual(c, 1)
+  tc.verifyGreaterThanOrEqual(h(mfilename("fullpath") + ".m"), 1)
 catch e
   tc.verifyEqual(e.identifier, 'stdlib:choose_method:NameError')
 end

test/TestExists.m

@@ -10,8 +10,8 @@
 {"", false}
 }
 % on CI matlabroot can be writable!
-isr_method = {'java', 'native', 'legacy'}
-isw_method = {'java', 'native', 'legacy'}
+fname = {'is_readable', 'is_writable'}
+method = {'java', 'native', 'legacy'}
 end
 
 methods(TestClassSetup)
@@ -29,31 +29,16 @@ function test_exists(tc, Ps)
 end
 
 
-function test_is_readable(tc, Ps, isr_method)
-is_capable(tc, str2func("stdlib." + isr_method + ".is_readable"))
-
-ok = stdlib.is_readable(Ps{1}, isr_method);
-tc.verifyEqual(ok, Ps{2}, Ps{1})
-end
-
-
-function test_is_writable(tc, Ps, isw_method)
-is_capable(tc, str2func("stdlib." + isw_method + ".is_writable"))
-
-ok = stdlib.is_writable(Ps{1}, isw_method);
-tc.verifyEqual(ok, Ps{2}, Ps{1})
+function test_is_rw(tc, Ps, method, fname)
+n = "stdlib." + method + "." + fname;
+h = str2func("stdlib." + fname);
+tc.assertNotEmpty(which(n))
+try
+  tc.verifyEqual(h(Ps{1}, method), Ps{2})
+catch e
+  tc.verifyEqual(e.identifier, 'stdlib:choose_method:NameError')
 end
-
-function test_is_writable_dir(tc, isw_method)
-is_capable(tc, str2func("stdlib." + isw_method + ".is_writable"))
-
-tc.assumeFalse(isMATLABReleaseOlderThan('R2022a'))
-
-td = tc.createTemporaryFolder();
-
-tc.verifyTrue(stdlib.is_writable(td, isw_method))
 end
 
 end
-
 end