diff options
| author | Quincey Koziol <koziol@hdfgroup.org> | 2003-04-09 01:47:03 (GMT) |
|---|---|---|
| committer | Quincey Koziol <koziol@hdfgroup.org> | 2003-04-09 01:47:03 (GMT) |
| commit | 5f94cb8141808378ed4d8cf6af82bdbe293c8855 (patch) | |
| tree | e91c5eb78ae21e50c24f7d954426607b7f7582a2 /fortran/src/H5Pf.c | |
| parent | c319d5813a372e92ccfb3029878013d8b5cbb4ec (diff) | |
| download | hdf5-5f94cb8141808378ed4d8cf6af82bdbe293c8855.zip hdf5-5f94cb8141808378ed4d8cf6af82bdbe293c8855.tar.gz hdf5-5f94cb8141808378ed4d8cf6af82bdbe293c8855.tar.bz2 | |
[svn-r6602] Purpose:
Code cleanup
Description:
Adjusted parameters for fortran wrappers of H5Pset_shuffle to match the
changes to the C API function.
Solution:
Platforms tested:
FreeBSD 4.8 (sleipnir) w/szip
Linux 2.4 (sleipnir) w/szip
Solaris 2.7 (arabica) w/FORTRAN
IRIX64 6.5 (modi4) w/szip, FORTRAN & parallel
Misc. update:
Diffstat (limited to 'fortran/src/H5Pf.c')
| -rw-r--r-- | fortran/src/H5Pf.c | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/fortran/src/H5Pf.c b/fortran/src/H5Pf.c index 57f2f7d..01e4af1 100644 --- a/fortran/src/H5Pf.c +++ b/fortran/src/H5Pf.c @@ -2819,16 +2819,14 @@ DONE: *---------------------------------------------------------------------------*/ int_f -nh5pset_shuffle_c ( hid_t_f *prp_id , int_f *type_size) +nh5pset_shuffle_c ( hid_t_f *prp_id ) { int ret_value = 0; hid_t c_prp_id; - int c_type_size; herr_t status; c_prp_id = (hid_t)*prp_id; - c_type_size = (int)*type_size ; - status = H5Pset_shuffle(c_prp_id, c_type_size); + status = H5Pset_shuffle(c_prp_id); if ( status < 0 ) ret_value = -1; return ret_value; } |