diff options
| author | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2011-10-14 18:39:47 (GMT) |
|---|---|---|
| committer | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2011-10-14 18:39:47 (GMT) |
| commit | 76e215174ab2afc3612e92b719d788b7d6c7f26f (patch) | |
| tree | 00e1b9e99a8b1c30ad46f2f2543e2627020f5854 /fortran/src/H5Tff_F03.f90 | |
| parent | b92a7abb344f9965853464697c64503c5953ee49 (diff) | |
| download | hdf5-76e215174ab2afc3612e92b719d788b7d6c7f26f.zip hdf5-76e215174ab2afc3612e92b719d788b7d6c7f26f.tar.gz hdf5-76e215174ab2afc3612e92b719d788b7d6c7f26f.tar.bz2 | |
[svn-r21568] Description:
Merged robodoc headers from trunk in the 1.8 branch, remove functions that should have not been merged into the 1.8 branch, removed the robodoc docomentation.
Tested: jam (gnu, intel, pgi)
Diffstat (limited to 'fortran/src/H5Tff_F03.f90')
| -rw-r--r-- | fortran/src/H5Tff_F03.f90 | 18 |
1 files changed, 11 insertions, 7 deletions
diff --git a/fortran/src/H5Tff_F03.f90 b/fortran/src/H5Tff_F03.f90 index 01600a0..902e2ac 100644 --- a/fortran/src/H5Tff_F03.f90 +++ b/fortran/src/H5Tff_F03.f90 @@ -5,9 +5,9 @@ ! ! PURPOSE ! This file contains Fortran 90 and Fortran 2003 interfaces for H5T functions. -! It contains the same functions as H5Tff_DEPRECIATE.f90 but includes the +! It contains the same functions as H5Tff_F90.f90 but includes the ! Fortran 2003 functions and the interface listings. This file will be compiled -! instead of H5Tff_DEPRECIATE.f90 if Fortran 2003 functions are enabled. +! instead of H5Tff_F90.f90 if Fortran 2003 functions are enabled. ! ! COPYRIGHT ! * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * @@ -36,16 +36,20 @@ MODULE H5T_PROVISIONAL USE H5GLOBAL - USE ISO_C_BINDING + USE, INTRINSIC :: ISO_C_BINDING +!****t* H5T (F03)/hvl_t +! Fortran2003 Derived Type: TYPE hvl_t INTEGER(size_t) :: len ! Length of VL data (in base type units) TYPE(C_PTR) :: p ! Pointer to VL data END TYPE hvl_t +!***** + CONTAINS -!****s* H5T (F03)/H5Tconvert_f +!****s* H5T (F03)/H5Tconvert_f_F03 ! ! NAME ! H5Tconvert_f @@ -69,9 +73,9 @@ CONTAINS ! M. Scot Breitenfeld ! Decemember 8, 2008 ! -! Signature: +! Fortran2003 Interface: SUBROUTINE h5tconvert_f(src_id, dst_id, nelmts, buf, hdferr, background, plist_id) - USE ISO_C_BINDING + USE, INTRINSIC :: ISO_C_BINDING IMPLICIT NONE INTEGER(HID_T) , INTENT(IN) :: src_id INTEGER(HID_T) , INTENT(IN) :: dst_id @@ -86,7 +90,7 @@ CONTAINS INTERFACE INTEGER FUNCTION h5tconvert_c(src_id, dst_id, nelmts, buf, background, plist_id) - USE ISO_C_BINDING + USE, INTRINSIC :: ISO_C_BINDING USE H5GLOBAL !DEC$IF DEFINED(HDF5F90_WINDOWS) !DEC$ATTRIBUTES C,reference,decorate,alias:'H5TCONVERT_C'::H5Tconvert_c |