diff options
| author | James Laird <jlaird@hdfgroup.org> | 2005-05-23 18:20:07 (GMT) |
|---|---|---|
| committer | James Laird <jlaird@hdfgroup.org> | 2005-05-23 18:20:07 (GMT) |
| commit | 985af5617fe40c9a6e9a0083dc889e56a7add362 (patch) | |
| tree | cc6bb4e196fd7502ad4f563793d370e322bea4d2 /fortran/src/H5f90global.f90 | |
| parent | edecc60b50455a42102cee189ccdac5c1bc2104e (diff) | |
| download | hdf5-985af5617fe40c9a6e9a0083dc889e56a7add362.zip hdf5-985af5617fe40c9a6e9a0083dc889e56a7add362.tar.gz hdf5-985af5617fe40c9a6e9a0083dc889e56a7add362.tar.bz2 | |
[svn-r10785] Purpose:
Feature
Description:
Added "support" for UTF-8 character encoding.
Solution:
Wrote tests to check that UTF-8 can be used in a number of places in
HDF5 (object names, data, etc.). These tests live in test/tunicode.c.
Added a new UTF-8 character encoding for datatypes.
Platforms tested:
mir, modi4, heping
Misc. update:
Diffstat (limited to 'fortran/src/H5f90global.f90')
| -rw-r--r-- | fortran/src/H5f90global.f90 | 16 |
1 files changed, 9 insertions, 7 deletions
diff --git a/fortran/src/H5f90global.f90 b/fortran/src/H5f90global.f90 index c1b8817..b17680e 100644 --- a/fortran/src/H5f90global.f90 +++ b/fortran/src/H5f90global.f90 @@ -470,7 +470,7 @@ ! ! H5T flags declaration ! - INTEGER, PARAMETER :: H5T_FLAGS_LEN = 30 + INTEGER, PARAMETER :: H5T_FLAGS_LEN = 31 INTEGER H5T_flags(H5T_FLAGS_LEN) !DEC$if defined(BUILD_HDF5_DLL) !DEC$ ATTRIBUTES DLLEXPORT :: /H5T_FLAGS/ @@ -503,6 +503,7 @@ INTEGER :: H5T_NORM_MSBSET_F INTEGER :: H5T_NORM_NONE_F INTEGER :: H5T_CSET_ASCII_F + INTEGER :: H5T_CSET_UTF8_F INTEGER :: H5T_STR_NULLTERM_F INTEGER :: H5T_STR_NULLPAD_F INTEGER :: H5T_STR_SPACEPAD_F @@ -532,12 +533,13 @@ EQUIVALENCE(H5T_flags(22), H5T_NORM_MSBSET_F) EQUIVALENCE(H5T_flags(23), H5T_NORM_NONE_F) EQUIVALENCE(H5T_flags(24), H5T_CSET_ASCII_F) - EQUIVALENCE(H5T_flags(25), H5T_STR_NULLTERM_F) - EQUIVALENCE(H5T_flags(26), H5T_STR_NULLPAD_F) - EQUIVALENCE(H5T_flags(27), H5T_STR_SPACEPAD_F) - EQUIVALENCE(H5T_flags(28), H5T_STR_ERROR_F) - EQUIVALENCE(H5T_flags(29), H5T_VLEN_F) - EQUIVALENCE(H5T_flags(30), H5T_ARRAY_F) + EQUIVALENCE(H5T_flags(25), H5T_CSET_UTF8_F) + EQUIVALENCE(H5T_flags(26), H5T_STR_NULLTERM_F) + EQUIVALENCE(H5T_flags(27), H5T_STR_NULLPAD_F) + EQUIVALENCE(H5T_flags(28), H5T_STR_SPACEPAD_F) + EQUIVALENCE(H5T_flags(29), H5T_STR_ERROR_F) + EQUIVALENCE(H5T_flags(30), H5T_VLEN_F) + EQUIVALENCE(H5T_flags(31), H5T_ARRAY_F) ! ! H5Z flags declaration |