hdf5, netcdf4: can write more integer types

'int8', 'int16', 'int32', 'int64', 'uint8', 'uint16', 'uint32', 'uint64'

Author: scivision

+stdlib/+hdf5nc/private/class2h5t.m

@@ -1,11 +1,14 @@
 function t = class2h5t(A)
 % gets HDF5 H5T of variable A
 
-switch class(A)
+C = class(A);
+switch C
   case 'double', t = 'H5T_NATIVE_DOUBLE';
   case 'single', t = 'H5T_NATIVE_FLOAT';
-  case 'int32', t = 'H5T_STD_I32LE';
-  case 'int64', t = 'H5T_STD_I64LE';
+  case {'int8', 'int16', 'int32', 'int64'}
+    t = "H5T_STD_I" + extractBetween(C, 4, strlength(C)) + "LE";
+  case {'uint8', 'uint16', 'uint32', 'uint64'}
+    t = "H5T_STD_U" + extractBetween(C, 5, strlength(C)) + "LE";
   otherwise, error('h5save:class2h5t: unknown data class %s', class(A))
 end
 

+stdlib/+hdf5nc/private/coerce_ds.m

@@ -17,30 +17,8 @@
 switch dtype
   case ""
     return
-  case {'float64', 'double'}
-    if ~isa(A, 'double')
-      A = double(A);
-    end
-  case {'float32', 'single'}
-    if ~isa(A, 'single')
-      A = single(A);
-    end
- case 'int8'
-     if ~isa(A, 'int8')
-       A = int8(A);
-     end
- case 'int16'
-     if ~isa(A, 'int16')
-       A = int16(A);
-     end
-  case 'int32'
-     if ~isa(A, 'int32')
-       A = int32(A);
-     end
-  case 'int64'
-     if ~isa(A, 'int64')
-       A = int64(A);
-     end
+  case {'float64', 'double', 'float32', 'single', 'int8', 'int16', 'int32', 'int64','uint8', 'uint16', 'uint32', 'uint64'}
+    A = cast(A, dtype);
   case 'char'
     A = string(A);
   case 'string'

+stdlib/TestHDF5.m

@@ -5,7 +5,7 @@
 end
 
 properties (TestParameter)
-type = {'single', 'double', 'int8', 'int16', 'int32', 'int64'}
+type = {'single', 'double', 'int8', 'int16', 'int32', 'int64', 'uint8', 'uint16', 'uint32', 'uint64'}
 vars = {'A0', 'A1', 'A2', 'A3', 'A4'}
 str = {"string", 'char'}
 end

+stdlib/TestNetCDF.m

@@ -5,7 +5,7 @@
 end
 
 properties (TestParameter)
-type = {'single', 'double', 'int32', 'int64'}
+type = {'single', 'double', 'int8', 'int16', 'int32', 'int64', 'uint8', 'uint16', 'uint32', 'uint64'}
 vars = {'A0', 'A1', 'A2', 'A3', 'A4'}
 end