ncsave,h5save: use try-catch for dedupe

Author: scivision

+stdlib/h5save.m

@@ -38,14 +38,14 @@ function h5save(filename, varname, A, opts)
 % coerce if needed
 A = coerce_ds(A, opts.type);
 
-if isfile(filename)
-  if stdlib.h5exists(filename, varname)
-    stdlib.h5save_exist(filename, varname, A, opts.size)
-  else
+try
+  stdlib.h5save_exist(filename, varname, A, opts.size)
+catch e
+  if any(e.identifier == ["MATLAB:imagesci:hdf5io:resourceNotFound", "MATLAB:imagesci:h5info:unableToFind"])
     stdlib.h5save_new(filename, varname, A, opts.size, opts.compressLevel)
+  else
+    rethrow(e)
   end
-else
-    stdlib.h5save_new(filename, varname, A, opts.size, opts.compressLevel)
 end
 
 end

+stdlib/ncsave.m

@@ -41,14 +41,14 @@ function ncsave(filename, varname, A, opts)
   end
 end
 
-if isfile(filename)
-  if stdlib.ncexists(filename, varname)
-    stdlib.ncsave_exist(filename, varname, A, sizeA)
-  else
+try
+  stdlib.ncsave_exist(filename, varname, A, sizeA)
+catch e
+  if any(e.identifier == ["MATLAB:imagesci:netcdf:unableToOpenFileforRead", "MATLAB:imagesci:netcdf:unknownLocation"])
     stdlib.ncsave_new(filename, varname, A, sizeA, opts.dims, opts.compressLevel)
+  else
+    rethrow(e)
   end
-else
-  stdlib.ncsave_new(filename, varname, A, sizeA, opts.dims, opts.compressLevel)
 end
 
 end

+stdlib/ncsave_exist.m

@@ -2,6 +2,12 @@
 % normally users will use ncsave() instead of this function
 
 function ncsave_exist(filename, varname, A, sizeA)
+arguments
+  filename {mustBeTextScalar}
+  varname {mustBeTextScalar}
+  A {mustBeNonempty}
+  sizeA (1,:) {mustBePositive, mustBeInteger}
+end
 
 diskshape = stdlib.ncsize(filename, varname);
 

private/publish_gen_index_html.m

@@ -12,10 +12,10 @@
 
 function publish_gen_index_html(pkg_name, tagline, project_url, outdir)
 arguments
-  pkg_name (1,1) string
-  tagline (1,1) string
-  project_url (1,1) string
-  outdir (1,1) string
+  pkg_name {mustBeTextScalar}
+  tagline {mustBeTextScalar}
+  project_url {mustBeTextScalar}
+  outdir {mustBeTextScalar}
 end
 
 pkg = what("+" + pkg_name);