summaryrefslogtreecommitdiffstats
path: root/fortran/src/H5Sff.f90
diff options
context:
space:
mode:
authorRaymond Lu <songyulu@hdfgroup.org>2004-05-18 16:09:46 (GMT)
committerRaymond Lu <songyulu@hdfgroup.org>2004-05-18 16:09:46 (GMT)
commitf04bbc535fe1592a2dd42db34e77bb3097011a65 (patch)
treed22b6aaf8387b4c2a0e1bf882d94d3547d4eaa46 /fortran/src/H5Sff.f90
parentd15b6b8d63b44c09a82ae020ca6d574f277289c7 (diff)
downloadhdf5-f04bbc535fe1592a2dd42db34e77bb3097011a65.zip
hdf5-f04bbc535fe1592a2dd42db34e77bb3097011a65.tar.gz
hdf5-f04bbc535fe1592a2dd42db34e77bb3097011a65.tar.bz2
[svn-r8538] Purpose: Add null dataspace for fortran.
Platforms tested: verbena pgf90(only fortran is concerned)
Diffstat (limited to 'fortran/src/H5Sff.f90')
-rw-r--r--fortran/src/H5Sff.f903
1 files changed, 3 insertions, 0 deletions
diff --git a/fortran/src/H5Sff.f90 b/fortran/src/H5Sff.f90
index 1657b39..27e8839 100644
--- a/fortran/src/H5Sff.f90
+++ b/fortran/src/H5Sff.f90
@@ -189,6 +189,7 @@
! Possible values are:
! H5S_SCALAR_F (0)
! H5S_SIMPLE_F(1)
+ ! H5S_NULL_F(2)
INTEGER(HID_T), INTENT(OUT) :: space_id ! Dataspace identifier
INTEGER, INTENT(OUT) :: hdferr ! Error code
@@ -1089,6 +1090,7 @@
! H5S_NO_CLASS_F (-1)
! H5S_SCALAR_F (0)
! H5S_SIMPLE_F (1)
+! H5S_NULL_F (2)
! hdferr: - error code
! Success: 0
! Failure: -1
@@ -1120,6 +1122,7 @@
! H5S_NO_CLASS_F (-1)
! H5S_SCALAR_F (0)
! H5S_SIMPLE_F (1)
+ ! H5S_NULL_F (2)
INTEGER, INTENT(OUT) :: hdferr ! Error code
! INTEGER, EXTERNAL :: h5sget_simple_extent_type_c