[svn-r8819] Purpose: Potential bug fix

Description:  In H5Fget_filesize, file size was returned as haddr_t.

Solution:  Return file size as hsize_t and parameter for Fortran.

Platforms tested:  eirene

2 files changed, 7 insertions, 5 deletions

diff --git a/c++/src/H5File.cpp b/c++/src/H5File.cpp
index cced607..f44d6f0 100644
--- a/c++/src/H5File.cpp
+++ b/c++/src/H5File.cpp
@@ -175,14 +175,16 @@ FileAccPropList H5File::getAccessPlist() const
 // is called after an existing file is opened in order
 // to learn the true size of the underlying file.
 //  (Raymond Lu)
-haddr_t H5File::getFileSize(void) const
+herr_t H5File::getFileSize(hsize_t *size) const
 {
-   haddr_t file_size = H5Fget_filesize(id);
-   if( file_size < 0 )
+   herr_t ret;
+   
+   ret = H5Fget_filesize(id, size);
+   if( ret < 0 )
    {
       throw FileIException("H5File::getFileSize", "H5Fget_filesize failed");
    }
-   return file_size;
+   return ret;
 }
 
 // Calls the C API H5Fclose to close this file.  Used by IdComponent::reset
diff --git a/c++/src/H5File.h b/c++/src/H5File.h
index 82615df..d1fe153 100644
--- a/c++/src/H5File.h
+++ b/c++/src/H5File.h
@@ -51,7 +51,7 @@ class H5_DLLCPP H5File : public IdComponent, public CommonFG {
 	void reopen();
 
         // Retrieves the file size of an opened file.
-        haddr_t getFileSize() const;
+        herr_t getFileSize(hsize_t *size) const;
 
 	// Gets the creation property list of this file
 	FileCreatPropList getCreatePlist() const;