src/Fortran:

- debug output warnings fixed
This commit is contained in:
2015-10-15 17:27:51 +02:00
parent 158fc17a2b
commit 089dc3e1ba
2 changed files with 7 additions and 7 deletions
+4 -4
View File
@@ -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,
+3 -3
View File
@@ -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,