diff options
| author | Elena Pourmal <epourmal@hdfgroup.org> | 2003-04-29 00:00:22 (GMT) |
|---|---|---|
| committer | Elena Pourmal <epourmal@hdfgroup.org> | 2003-04-29 00:00:22 (GMT) |
| commit | e42dba5336d382d401d753609d415155243f7086 (patch) | |
| tree | f8a45de293b7f0b5876c6a2a6bf50f173493e5e4 /fortran/src/H5Ff.c | |
| parent | c37bcc12fcb51330a640adc82de5caaf388e9f92 (diff) | |
| download | hdf5-e42dba5336d382d401d753609d415155243f7086.zip hdf5-e42dba5336d382d401d753609d415155243f7086.tar.gz hdf5-e42dba5336d382d401d753609d415155243f7086.tar.bz2 | |
[svn-r6772]
Purpose: Windows maintenance and code cleanup
Description: There were a lot of places in the source code where varibale
was declared but never used.
Solution: Cleaned the source code to avoid warnings on Windows adn Unix
platforms.
Platforms tested: arabica, modi4, Windows
Probably my environment is wrong on Linux, cannot
compile at all when fortran is enabled
If daily tests fails tomorrow, this will be my fault
but I want to go home now :-)
Misc. update:
Diffstat (limited to 'fortran/src/H5Ff.c')
| -rw-r--r-- | fortran/src/H5Ff.c | 20 |
1 files changed, 0 insertions, 20 deletions
diff --git a/fortran/src/H5Ff.c b/fortran/src/H5Ff.c index 74ad7a5..2d8e5ef 100644 --- a/fortran/src/H5Ff.c +++ b/fortran/src/H5Ff.c @@ -96,31 +96,11 @@ nh5fflush_c (hid_t_f *object_id, int_f *scope) { int ret_value = -1; hid_t c_file_id; - int CASE; H5F_scope_t c_scope; htri_t status; c_scope = (H5F_scope_t)*scope; /* - * Define scope flags - */ -/* - CASE = (int)*scope; - switch (CASE) { - - case H5F_SCOPE_LOCAL_F: - c_scope = H5F_SCOPE_LOCAL; - break; - - case H5F_SCOPE_GLOBAL_F: - c_scope = H5F_SCOPE_GLOBAL; - break; - - default: - return ret_value; - } -*/ - /* * Call H5Fflush function. */ |