diff options
| author | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2011-10-23 21:54:47 (GMT) |
|---|---|---|
| committer | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2011-10-23 21:54:47 (GMT) |
| commit | aa4fe8486fd86bc931de398d0274e8b3f5bb67e1 (patch) | |
| tree | a8d92ac88b965e397c782d11f9bdd940dfb317e0 /fortran | |
| parent | 0ffe28aef728421a0221ac413325d6bf33a64a77 (diff) | |
| download | hdf5-aa4fe8486fd86bc931de398d0274e8b3f5bb67e1.zip hdf5-aa4fe8486fd86bc931de398d0274e8b3f5bb67e1.tar.gz hdf5-aa4fe8486fd86bc931de398d0274e8b3f5bb67e1.tar.bz2 | |
[svn-r21654] Description:
Fixed the GM offset returned in the derived type h5_info_t and use the functon HDgmtime instead of gmtime.
tested: jam( intel, gnu)
Diffstat (limited to 'fortran')
| -rw-r--r-- | fortran/src/H5Of.c | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/fortran/src/H5Of.c b/fortran/src/H5Of.c index ffbf661..0df433a 100644 --- a/fortran/src/H5Of.c +++ b/fortran/src/H5Of.c @@ -268,45 +268,45 @@ nh5oget_info_by_name_c (hid_t_f *loc_id, _fcd name, size_t_f *namelen, hid_t_f * object_info->type = (int_f)Oinfo.type; object_info->rc = (int_f)Oinfo.rc; - ts = gmtime(&Oinfo.atime); + ts = HDgmtime(&Oinfo.atime); object_info->atime[0] = (int_f)ts->tm_year+1900; /* year starts at 1900 */ object_info->atime[1] = (int_f)ts->tm_mon+1; /* month starts at 0 in C */ object_info->atime[2] = (int_f)ts->tm_mday; -/* object_info->atime[3] = (int_f)ts->tm_gmtoff; /\* convert from seconds to minutes *\/ */ + object_info->atime[3] = 0; /* time is expressed as UTC (or GMT timezone) */ object_info->atime[4] = (int_f)ts->tm_hour; object_info->atime[5] = (int_f)ts->tm_min; object_info->atime[6] = (int_f)ts->tm_sec; object_info->atime[7] = -32767; /* millisecond is not available, assign it -HUGE(0) */ - ts = gmtime(&Oinfo.btime); + ts = HDgmtime(&Oinfo.btime); object_info->btime[0] = (int_f)ts->tm_year+1900; /* year starts at 1900 */ object_info->btime[1] = (int_f)ts->tm_mon+1; /* month starts at 0 in C */ object_info->btime[2] = (int_f)ts->tm_mday; -/* object_info->btime[3] = (int_f)ts->tm_gmtoff/60; /\* convert from seconds to minutes *\/ */ + object_info->btime[3] = 0; /* time is expressed as UTC (or GMT timezone) */ object_info->btime[4] = (int_f)ts->tm_hour; object_info->btime[5] = (int_f)ts->tm_min; object_info->btime[6] = (int_f)ts->tm_sec; object_info->btime[7] = -32767; /* millisecond is not available, assign it -HUGE(0) */ - ts = gmtime(&Oinfo.ctime); + ts = HDgmtime(&Oinfo.ctime); object_info->ctime[0] = (int_f)ts->tm_year+1900; /* year starts at 1900 */ object_info->ctime[1] = (int_f)ts->tm_mon+1; /* month starts at 0 in C */ object_info->ctime[2] = (int_f)ts->tm_mday; -/* object_info->ctime[3] = (int_f)ts->tm_gmtoff/60; /\* convert from seconds to minutes *\/ */ + object_info->ctime[3] = 0; /* time is expressed as UTC (or GMT timezone) */ object_info->ctime[4] = (int_f)ts->tm_hour; object_info->ctime[5] = (int_f)ts->tm_min; object_info->ctime[6] = (int_f)ts->tm_sec; object_info->ctime[7] = -32767; /* millisecond is not available, assign it -HUGE(0) */ - ts = gmtime(&Oinfo.mtime); + ts = HDgmtime(&Oinfo.mtime); object_info->mtime[0] = (int_f)ts->tm_year+1900; /* year starts at 1900 */ object_info->mtime[1] = (int_f)ts->tm_mon+1; /* month starts at 0 in C */ object_info->mtime[2] = (int_f)ts->tm_mday; -/* object_info->mtime[3] = (int_f)ts->tm_gmtoff/60; /\* convert from seconds to minutes *\/ */ + object_info->mtime[3] = 0; /* time is expressed as UTC (or GMT timezone) */ object_info->mtime[4] = (int_f)ts->tm_hour; object_info->mtime[5] = (int_f)ts->tm_min; object_info->mtime[6] = (int_f)ts->tm_sec; |