diff options
| author | Quincey Koziol <koziol@hdfgroup.org> | 2004-04-18 04:10:09 (GMT) |
|---|---|---|
| committer | Quincey Koziol <koziol@hdfgroup.org> | 2004-04-18 04:10:09 (GMT) |
| commit | 0a29514b9dd967deb64b53b39e12d6b55177b76c (patch) | |
| tree | a0a2fce3c7a13fcdf1deed6c022a47bfb5a2cbf1 /fortran/src/H5FDmpiof.c | |
| parent | 432f394cbbc6f77861501f91dc2fc5c209f3811f (diff) | |
| download | hdf5-0a29514b9dd967deb64b53b39e12d6b55177b76c.zip hdf5-0a29514b9dd967deb64b53b39e12d6b55177b76c.tar.gz hdf5-0a29514b9dd967deb64b53b39e12d6b55177b76c.tar.bz2 | |
[svn-r8383] Purpose:
Code cleanup
Description:
Clean up lots of warnings based on those reported from the SGI compilers
as well as gcc.
Platforms tested:
SGI O3900, IRIX64 6.5 (Cheryl's SGI machine)
FreeBSD 4.9 (sleipnir) w/ & w/o parallel
h5committest
Diffstat (limited to 'fortran/src/H5FDmpiof.c')
| -rw-r--r-- | fortran/src/H5FDmpiof.c | 9 |
1 files changed, 2 insertions, 7 deletions
diff --git a/fortran/src/H5FDmpiof.c b/fortran/src/H5FDmpiof.c index 2992a3b..3189477 100644 --- a/fortran/src/H5FDmpiof.c +++ b/fortran/src/H5FDmpiof.c @@ -112,10 +112,7 @@ nh5pset_dxpl_mpio_c(hid_t_f *prp_id, int_f* data_xfer_mode) herr_t ret; H5FD_mpio_xfer_t c_data_xfer_mode; /* - int CASE; - - CASE = *data_xfer_mode; - switch (CASE) { + switch (*data_xfer_mode) { case H5FD_MPIO_INDEPENDENT_F: c_data_xfer_mode = H5FD_MPIO_INDEPENDENT; @@ -157,7 +154,6 @@ nh5pget_dxpl_mpio_c(hid_t_f *prp_id, int_f* data_xfer_mode) hid_t c_prp_id; herr_t ret; H5FD_mpio_xfer_t c_data_xfer_mode; - int CASE; /* * Call H5Pget_xfer function. @@ -167,8 +163,7 @@ nh5pget_dxpl_mpio_c(hid_t_f *prp_id, int_f* data_xfer_mode) if (ret < 0) return ret_value; *data_xfer_mode = (int_f)c_data_xfer_mode; /* - CASE = c_data_xfer_mode; - switch (CASE) { + switch (c_data_xfer_mode) { case H5FD_MPIO_INDEPENDENT: *data_xfer_mode = H5FD_MPIO_INDEPENDENT_F; |