diff options
author | Quincey Koziol <koziol@hdfgroup.org> | 2008-12-23 22:29:51 (GMT) |
---|---|---|
committer | Quincey Koziol <koziol@hdfgroup.org> | 2008-12-23 22:29:51 (GMT) |
commit | de5e1d93e44fdab49ab2d6b3bad4042219ad5236 (patch) | |
tree | 0aa77d26b2bcb26d986413080661e78e5c2ec5dc /src/H5FDcore.c | |
parent | 26a82c35750b688cb9a5c21bc27e272416027622 (diff) | |
download | hdf5-de5e1d93e44fdab49ab2d6b3bad4042219ad5236.zip hdf5-de5e1d93e44fdab49ab2d6b3bad4042219ad5236.tar.gz hdf5-de5e1d93e44fdab49ab2d6b3bad4042219ad5236.tar.bz2 |
[svn-r16219] Description:
Bring revisions 16206:16218 back from trunk
Tested on:
Mac OS X/32 10.5.6 (amazon)
Diffstat (limited to 'src/H5FDcore.c')
-rw-r--r-- | src/H5FDcore.c | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/src/H5FDcore.c b/src/H5FDcore.c index 68a0655..cda7308 100644 --- a/src/H5FDcore.c +++ b/src/H5FDcore.c @@ -985,6 +985,13 @@ if(file->eof < new_eof) /* Update backing store, if using it */ if(file->fd >= 0 && file->backing_store) { +#ifdef H5_VMS + /* Reset seek offset to the beginning of the file, so that the file isn't + * re-extended later. This may happen on Open VMS. */ + if(-1 == HDlseek(file->fd, 0, SEEK_SET)) + HSYS_GOTO_ERROR(H5E_IO, H5E_SEEKERROR, FAIL, "unable to seek to proper position") +#endif + if(-1 == HDftruncate(file->fd, (off_t)new_eof)) HSYS_GOTO_ERROR(H5E_IO, H5E_SEEKERROR, FAIL, "unable to extend file properly") } /* end if */ |