summaryrefslogtreecommitdiffstats
path: root/fortran/src/H5Dff.f90
diff options
context:
space:
mode:
authorElena Pourmal <epourmal@hdfgroup.org>2000-11-17 22:43:27 (GMT)
committerElena Pourmal <epourmal@hdfgroup.org>2000-11-17 22:43:27 (GMT)
commit5dad15399582249d6fa0d7100a84b46116925bf8 (patch)
tree9c021ed6bde61abd44769ade48de63c235186983 /fortran/src/H5Dff.f90
parentcfac5f773e8fc360a69d8384674d7a557d5a43f6 (diff)
downloadhdf5-5dad15399582249d6fa0d7100a84b46116925bf8.zip
hdf5-5dad15399582249d6fa0d7100a84b46116925bf8.tar.gz
hdf5-5dad15399582249d6fa0d7100a84b46116925bf8.tar.bz2
[svn-r2975]
Purpose: Code maintenance and development Description: I added two functions h5open_f and h5close_f to initialize C library and Fortran interface (flags, predefined datatypes, etc). Those calls are required for any F90 program that uses HDF5. I renamed H5f90misc.c and H5f90miscf.f90 files to H5f.c and H5ff.f90. New functions are added to those new files. Platforms tested: Solaris 2.6
Diffstat (limited to 'fortran/src/H5Dff.f90')
-rw-r--r--fortran/src/H5Dff.f902
1 files changed, 1 insertions, 1 deletions
diff --git a/fortran/src/H5Dff.f90 b/fortran/src/H5Dff.f90
index f573ea7..4fd234e 100644
--- a/fortran/src/H5Dff.f90
+++ b/fortran/src/H5Dff.f90
@@ -106,7 +106,7 @@
INTEGER, EXTERNAL :: h5dcreate_c
creation_prp_default = H5P_DEFAULT_F
- if (present(creation_prp)) creation_prp_default = creation_prp
+ if (present(creation_prp)) creation_prp_default = creation_prp
namelen = LEN(name)
hdferr = h5dcreate_c(loc_id, name, namelen, type_id, space_id, &
creation_prp_default, dset_id)