From 51abd359f3932864cf885c662ba098ead21655c6 Mon Sep 17 00:00:00 2001
From: Scot Breitenfeld <brtnfld@hdfgroup.org>
Date: Mon, 22 Dec 2014 09:12:04 -0500
Subject: [svn-r25917] Added BIND(C) to fortran functions that pass a VALUE.

---
 fortran/src/H5Aff_F03.f90 | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/fortran/src/H5Aff_F03.f90 b/fortran/src/H5Aff_F03.f90
index 807f6fa..e4b0eb2 100644
--- a/fortran/src/H5Aff_F03.f90
+++ b/fortran/src/H5Aff_F03.f90
@@ -143,7 +143,7 @@ MODULE H5A_PROVISIONAL
 !  to the C H5Awrite routine
 
   INTERFACE
-     INTEGER FUNCTION h5awrite_f_c(attr_id, mem_type_id, buf)
+     INTEGER FUNCTION h5awrite_f_c(attr_id, mem_type_id, buf) BIND(C,name='')
        USE H5GLOBAL
        USE, INTRINSIC :: ISO_C_BINDING
        !DEC$IF DEFINED(HDF5F90_WINDOWS)
@@ -159,7 +159,7 @@ MODULE H5A_PROVISIONAL
 !  to the C H5Aread routine
 
   INTERFACE
-     INTEGER FUNCTION h5aread_f_c(attr_id, mem_type_id, buf)
+     INTEGER FUNCTION h5aread_f_c(attr_id, mem_type_id, buf) BIND(C,name='')
        USE H5GLOBAL
        USE, INTRINSIC :: ISO_C_BINDING
        !DEC$IF DEFINED(HDF5F90_WINDOWS)
-- 
cgit v0.12