summaryrefslogtreecommitdiffstats
path: root/fortran
diff options
context:
space:
mode:
authorQuincey Koziol <koziol@hdfgroup.org>2008-08-12 12:46:40 (GMT)
committerQuincey Koziol <koziol@hdfgroup.org>2008-08-12 12:46:40 (GMT)
commit507a21125783ea03d75e8c6460212cd22f8466ee (patch)
treea8279d3036e2bf3b625d33a104ac35996e26dfcf /fortran
parent4f61812180385bb969fee33eece609180cab4866 (diff)
downloadhdf5-507a21125783ea03d75e8c6460212cd22f8466ee.zip
hdf5-507a21125783ea03d75e8c6460212cd22f8466ee.tar.gz
hdf5-507a21125783ea03d75e8c6460212cd22f8466ee.tar.bz2
[svn-r15462] Description:
Correct compiler warnings from Visual Studio. Tested on: Mac OS X/32 10.5.4 (amazon) w/FORTRAN & C++ (Too minor to require full h5committest)
Diffstat (limited to 'fortran')
-rw-r--r--fortran/src/H5Pf.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/fortran/src/H5Pf.c b/fortran/src/H5Pf.c
index 02da4f2..e466152 100644
--- a/fortran/src/H5Pf.c
+++ b/fortran/src/H5Pf.c
@@ -4199,12 +4199,12 @@ int_f
nh5pset_fapl_direct_c(hid_t_f *fapl_id, size_t_f *alignment, size_t_f *block_size, size_t_f *cbuf_size )
{
int ret_value = -1;
+#ifdef H5_HAVE_DIRECT
herr_t ret;
/*
* Call H5Pset_link_phase_change function.
*/
-#ifdef H5_HAVE_DIRECT
ret = H5Pset_fapl_direct((hid_t)*fapl_id, (size_t)*alignment, (size_t)*block_size, (size_t)*cbuf_size );
if (ret < 0) return ret_value;
@@ -4233,6 +4233,7 @@ int_f
nh5pget_fapl_direct_c(hid_t_f *fapl_id, size_t_f *alignment, size_t_f *block_size, size_t_f *cbuf_size )
{
int ret_value = -1;
+#ifdef H5_HAVE_DIRECT
herr_t ret;
size_t c_alignment;
size_t c_block_size;
@@ -4241,7 +4242,6 @@ nh5pget_fapl_direct_c(hid_t_f *fapl_id, size_t_f *alignment, size_t_f *block_siz
/*
* Call H5Pget_link_phase_change function.
*/
-#ifdef H5_HAVE_DIRECT
ret = H5Pget_fapl_direct((hid_t)*fapl_id, &c_alignment, &c_block_size, &c_cbuf_size );
if (ret < 0) return ret_value;