From 493c6fd9ccb9d1e23516ba83b24249fb1d4ccba7 Mon Sep 17 00:00:00 2001 From: Paul Romano Date: Mon, 4 Jan 2016 06:54:35 -0600 Subject: [PATCH] Fix type of return argument for h5pget_driver_f. --- src/hdf5_interface.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/hdf5_interface.F90 b/src/hdf5_interface.F90 index fc7a462e6..01e50d983 100644 --- a/src/hdf5_interface.F90 +++ b/src/hdf5_interface.F90 @@ -1898,7 +1898,7 @@ contains logical :: mpio integer :: hdf5_err - integer :: driver + integer(HID_T) :: driver integer(HID_T) :: file_id integer(HID_T) :: fapl_id