cleanup use only

geospace-code · Mar 11, 2020 · bebf066 · bebf066
1 parent 616fab9
commit bebf066
Show file tree

Hide file tree

Showing 8 changed files with 11 additions and 13 deletions.
diff --git a/CMakeLists.txt b/CMakeLists.txt
@@ -4,7 +4,7 @@ if(NOT CMAKE_BUILD_TYPE)
 endif()
 project(h5fortran
   LANGUAGES C Fortran
-  VERSION 2.8.0
+  VERSION 2.8.1
   DESCRIPTION "thin, light, easy HDF5 Fortran interface"
   HOMEPAGE_URL https://github.com/scivision/h5fortran)
 enable_testing()

diff --git a/meson.build b/meson.build
@@ -1,6 +1,6 @@
 project('h5fortran', 'fortran',
   meson_version : '>=0.52.0',
-  version : '2.8.0',
+  version : '2.8.1',
   default_options : ['default_library=static', 'buildtype=release', 'warning_level=3'])
 
 subdir('meson')

diff --git a/src/read.f90 b/src/read.f90
@@ -1,9 +1,8 @@
 submodule (h5fortran) read
 !! This submodule is for reading HDF5 via submodules
-use hdf5, only : h5dopen_f, h5dread_f, h5dclose_f, h5dget_create_plist_f, &
+use hdf5, only : h5dopen_f, h5dclose_f, h5dget_create_plist_f, &
   h5pget_layout_f, h5pget_chunk_f, H5D_CONTIGUOUS_F, H5D_CHUNKED_F
-use H5LT, only : h5ltread_dataset_f, h5ltread_dataset_int_f, h5ltread_dataset_float_f, h5ltread_dataset_double_f,&
-  h5ltread_dataset_string_f, h5ltpath_valid_f
+use H5LT, only : h5ltpath_valid_f
 
 implicit none
 

diff --git a/src/reader.f90 b/src/reader.f90
@@ -1,12 +1,8 @@
 submodule (h5fortran:read) reader
 !! This submodule is for reading 0-D..7-D data
-!! NOTE:
-!! Because of C interface to HDF5, anytime an array is read, we need
-!! to use "buf" variable.
-!! Even intent(inout) doesn't help without separate "buf" variable
 
-use hdf5, only: HSIZE_T, SIZE_T
-use H5LT, only: h5ltpath_valid_f
+use hdf5, only : h5dread_f
+use h5lt, only : h5ltread_dataset_string_f
 
 implicit none
 contains

diff --git a/src/reader_nd.f90 b/src/reader_nd.f90
@@ -1,3 +1,4 @@
+!! conceptual--not tested--will use h5dread_f instead
 submodule (h5fortran:read) reader_ND
 
 implicit none

diff --git a/src/write.f90 b/src/write.f90
@@ -2,11 +2,11 @@
 !! This submodule is for writing HDF5 data via child submodules
 use hdf5, only: &
 h5screate_f, H5S_SCALAR_F, &
-h5dcreate_f, h5dwrite_f, &
+h5dcreate_f, &
 h5pset_chunk_f, h5pset_deflate_f, h5pset_shuffle_f, h5pcreate_f, H5P_DATASET_CREATE_F, h5pclose_f, &
 h5gopen_f, h5gclose_f
 
-use H5LT, only: h5ltmake_dataset_f, h5ltpath_valid_f, h5ltset_attribute_string_f, h5ltmake_dataset_string_f
+use H5LT, only: h5ltpath_valid_f, h5ltset_attribute_string_f, h5ltmake_dataset_string_f
 
 implicit none
 contains

diff --git a/src/writer.f90 b/src/writer.f90
@@ -1,5 +1,6 @@
 submodule (h5fortran:write) writer
 !! This submodule is for writing 0-D..7-D data
+use hdf5, only: h5dwrite_f
 
 implicit none
 

diff --git a/src/writer_lt.f90 b/src/writer_lt.f90
@@ -1,4 +1,5 @@
 submodule (h5fortran:write) writer_lt
+
 implicit none
 
 contains