summaryrefslogtreecommitdiffstats
path: root/fortran
diff options
context:
space:
mode:
Diffstat (limited to 'fortran')
-rw-r--r--fortran/src/H5Tf.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/fortran/src/H5Tf.c b/fortran/src/H5Tf.c
index f1be9c6..13fea93 100644
--- a/fortran/src/H5Tf.c
+++ b/fortran/src/H5Tf.c
@@ -419,11 +419,11 @@ nh5tget_offset_c ( hid_t_f *type_id , size_t_f *offset)
{
int ret_value = -1;
hid_t c_type_id;
- size_t c_offset;
+ int c_offset;
c_type_id = *type_id;
c_offset = H5Tget_offset(c_type_id);
- if ( c_offset == 0 ) return ret_value;
+ if ( c_offset < 0 ) return ret_value;
*offset = (size_t_f)c_offset ;
ret_value = 0;
@@ -725,7 +725,7 @@ nh5tget_norm_c ( hid_t_f *type_id , int_f *norm)
c_type_id = *type_id;
c_norm = H5Tget_norm(c_type_id);
- if ( c_norm == 0 ) return ret_value;
+ if ( c_norm == H5T_NORM_ERROR ) return ret_value;
*norm = (int_f)c_norm;
ret_value = 0;