summaryrefslogtreecommitdiffstats
path: root/fortran/test/fortranlib_test.F90
diff options
context:
space:
mode:
authorScot Breitenfeld <brtnfld@hdfgroup.org>2021-08-30 14:56:32 (GMT)
committerGitHub <noreply@github.com>2021-08-30 14:56:32 (GMT)
commit01fe2549a36d7635b2cbe6f6a57cbcce29c1335b (patch)
tree889541417f0b7ca57f117b647d59365079768608 /fortran/test/fortranlib_test.F90
parent794acf489fa093a3a119723c7cea74cb2880624b (diff)
downloadhdf5-01fe2549a36d7635b2cbe6f6a57cbcce29c1335b.zip
hdf5-01fe2549a36d7635b2cbe6f6a57cbcce29c1335b.tar.gz
hdf5-01fe2549a36d7635b2cbe6f6a57cbcce29c1335b.tar.bz2
Rework of PR #826 (#972)
* H5Fget_name_f fixed to handle correctly trailing whitespaces and newly allocated buffers. Co-authored-by: github-actions <41898282+github-actions[bot]@users.noreply.github.com>
Diffstat (limited to 'fortran/test/fortranlib_test.F90')
-rw-r--r--fortran/test/fortranlib_test.F904
1 files changed, 4 insertions, 0 deletions
diff --git a/fortran/test/fortranlib_test.F90 b/fortran/test/fortranlib_test.F90
index eff4657..1640a8f 100644
--- a/fortran/test/fortranlib_test.F90
+++ b/fortran/test/fortranlib_test.F90
@@ -74,6 +74,10 @@ PROGRAM fortranlibtest
CALL write_test_status(ret_total_error, ' Reopen test', total_error)
ret_total_error = 0
+ CALL get_name_test(cleanup, ret_total_error)
+ CALL write_test_status(ret_total_error, ' Get name test', total_error)
+
+ ret_total_error = 0
CALL file_close(cleanup, ret_total_error)
CALL write_test_status(ret_total_error, ' File open/close test', total_error)