diff --git a/src/Fortran/H5Block_attribs.c b/src/Fortran/H5Block_attribs.c index 16a0ff6..3229269 100644 --- a/src/Fortran/H5Block_attribs.c +++ b/src/Fortran/H5Block_attribs.c @@ -226,7 +226,7 @@ h5bl_writefieldattrib_r8 ( (h5_file_p)f, l_field_name, field_name, l_attrib_name, attrib_name, - attrib_value, *attrib_nelems); + attrib_value, (long long)*attrib_nelems); H5_API_RETURN (write_field_attrib ( f, field_name, l_field_name, @@ -283,7 +283,7 @@ h5bl_writefieldattrib_r4 ( (h5_file_p)f, l_field_name, field_name, l_attrib_name, attrib_name, - attrib_value, *attrib_nelems); + attrib_value, (long long)*attrib_nelems); H5_API_RETURN (write_field_attrib ( f, field_name, l_field_name, @@ -348,7 +348,7 @@ h5bl_writefieldattrib_i8 ( (h5_file_p)f, l_field_name, field_name, l_attrib_name, attrib_name, - attrib_value, *attrib_nelems); + attrib_value, (long long)*attrib_nelems); H5_API_RETURN (write_field_attrib ( f, field_name, l_field_name, @@ -406,7 +406,7 @@ h5bl_writefieldattrib_i4 ( (h5_file_p)f, l_field_name, field_name, l_attrib_name, attrib_name, - attrib_value, *attrib_nelems); + attrib_value, (long long)*attrib_nelems); H5_API_RETURN (write_field_attrib ( f, field_name, l_field_name, diff --git a/src/Fortran/H5Block_model.c b/src/Fortran/H5Block_model.c index de3bc46..1e8ee27 100755 --- a/src/Fortran/H5Block_model.c +++ b/src/Fortran/H5Block_model.c @@ -61,9 +61,9 @@ h5bl_3d_setview ( "j_start=%lld, j_end=%lld, " "k_start=%lld, k_end=%lld", (h5_file_p)f, - *i_start, (long long)i_end, - (long long)j_start, (long long)j_end, - (long long)k_start, (long long)k_end); + (long long)*i_start, (long long)*i_end, + (long long)*j_start, (long long)*j_end, + (long long)*k_start, (long long)*k_end); H5_API_RETURN(h5b_3d_set_view ( f, *i_start-1, *i_end-1,