[svn-r15598] Description:

Moved all the windows DLL function declarations to one file (hdf5_fortrandll.def).

1 files changed, 69 insertions, 371 deletions

diff --git a/fortran/src/H5Aff.f90 b/fortran/src/H5Aff.f90
index d0b1f65..891a39c 100644
--- a/fortran/src/H5Aff.f90
+++ b/fortran/src/H5Aff.f90
@@ -116,11 +116,7 @@ CONTAINS
 !
 !----------------------------------------------------------------------
   SUBROUTINE h5acreate_f(loc_id, name, type_id, space_id, attr_id, &
-                                 hdferr, acpl_id, aapl_id ) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5acreate_f
-!DEC$endif
+                                 hdferr, acpl_id, aapl_id )
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: loc_id    ! Object identifier 
     CHARACTER(LEN=*), INTENT(IN) :: name    ! Attribute name
@@ -197,11 +193,7 @@ CONTAINS
 !
 !----------------------------------------------------------------------
 
-  SUBROUTINE h5aopen_name_f(obj_id, name, attr_id, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aopen_name_f
-!DEC$endif
+  SUBROUTINE h5aopen_name_f(obj_id, name, attr_id, hdferr)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: obj_id    ! Object identifier 
     CHARACTER(LEN=*), INTENT(IN) :: name    ! Attribute name
@@ -257,11 +249,7 @@ CONTAINS
 !
 !----------------------------------------------------------------------
 
-  SUBROUTINE h5aopen_idx_f(obj_id, index, attr_id, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aopen_idx_f
-!DEC$endif
+  SUBROUTINE h5aopen_idx_f(obj_id, index, attr_id, hdferr)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: obj_id    ! Object identifier 
     INTEGER, INTENT(IN) :: index            ! Attribute index 
@@ -287,11 +275,7 @@ CONTAINS
   END SUBROUTINE h5aopen_idx_f
 
 
-  SUBROUTINE h5awrite_integer_scalar(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5awrite_integer_scalar
-!DEC$endif
+  SUBROUTINE h5awrite_integer_scalar(attr_id, memtype_id,  buf, dims, hdferr)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
     INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -319,11 +303,7 @@ CONTAINS
     hdferr = h5awrite_integer_s_c(attr_id, memtype_id,  buf, dims)
   END SUBROUTINE h5awrite_integer_scalar
 
-  SUBROUTINE h5awrite_integer_1(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5awrite_integer_1
-!DEC$endif
+  SUBROUTINE h5awrite_integer_1(attr_id, memtype_id,  buf, dims, hdferr)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
     INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -355,11 +335,7 @@ CONTAINS
   END SUBROUTINE h5awrite_integer_1
 
 
-  SUBROUTINE h5awrite_integer_2(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5awrite_integer_2
-!DEC$endif
+  SUBROUTINE h5awrite_integer_2(attr_id, memtype_id,  buf, dims, hdferr)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
     INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -390,11 +366,7 @@ CONTAINS
   END SUBROUTINE h5awrite_integer_2
 
 
-  SUBROUTINE h5awrite_integer_3(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5awrite_integer_3
-!DEC$endif
+  SUBROUTINE h5awrite_integer_3(attr_id, memtype_id,  buf, dims, hdferr)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
     INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -424,11 +396,7 @@ CONTAINS
   END SUBROUTINE h5awrite_integer_3
 
 
-  SUBROUTINE h5awrite_integer_4(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5awrite_integer_4
-!DEC$endif
+  SUBROUTINE h5awrite_integer_4(attr_id, memtype_id,  buf, dims, hdferr)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
     INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -459,11 +427,7 @@ CONTAINS
   END SUBROUTINE h5awrite_integer_4
 
 
-  SUBROUTINE h5awrite_integer_5(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5awrite_integer_5
-!DEC$endif
+  SUBROUTINE h5awrite_integer_5(attr_id, memtype_id,  buf, dims, hdferr)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
     INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -493,11 +457,7 @@ CONTAINS
   END SUBROUTINE h5awrite_integer_5
 
 
-  SUBROUTINE h5awrite_integer_6(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5awrite_integer_6
-!DEC$endif
+  SUBROUTINE h5awrite_integer_6(attr_id, memtype_id,  buf, dims, hdferr)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
     INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -529,11 +489,7 @@ CONTAINS
   END SUBROUTINE h5awrite_integer_6
 
 
-  SUBROUTINE h5awrite_integer_7(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5awrite_integer_7
-!DEC$endif
+  SUBROUTINE h5awrite_integer_7(attr_id, memtype_id,  buf, dims, hdferr)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
     INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -565,11 +521,7 @@ CONTAINS
   END SUBROUTINE h5awrite_integer_7
 
 
-  SUBROUTINE h5awrite_real_scalar(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5awrite_real_scalar
-!DEC$endif
+  SUBROUTINE h5awrite_real_scalar(attr_id, memtype_id,  buf, dims, hdferr)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
     INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -597,11 +549,7 @@ CONTAINS
     hdferr = h5awrite_real_s_c(attr_id, memtype_id,  buf, dims)
   END SUBROUTINE h5awrite_real_scalar
 
-  SUBROUTINE h5awrite_real_1(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5awrite_real_1
-!DEC$endif
+  SUBROUTINE h5awrite_real_1(attr_id, memtype_id,  buf, dims, hdferr)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
     INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -633,11 +581,7 @@ CONTAINS
   END SUBROUTINE h5awrite_real_1
 
 
-          SUBROUTINE h5awrite_real_2(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5awrite_real_2
-!DEC$endif
+          SUBROUTINE h5awrite_real_2(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -669,11 +613,7 @@ CONTAINS
           END SUBROUTINE h5awrite_real_2
 
 
-          SUBROUTINE h5awrite_real_3(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5awrite_real_3
-!DEC$endif
+          SUBROUTINE h5awrite_real_3(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -705,11 +645,7 @@ CONTAINS
           END SUBROUTINE h5awrite_real_3
 
 
-          SUBROUTINE h5awrite_real_4(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5awrite_real_4
-!DEC$endif
+          SUBROUTINE h5awrite_real_4(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -741,11 +677,7 @@ CONTAINS
           END SUBROUTINE h5awrite_real_4
 
 
-          SUBROUTINE h5awrite_real_5(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5awrite_real_5
-!DEC$endif
+          SUBROUTINE h5awrite_real_5(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -777,11 +709,7 @@ CONTAINS
           END SUBROUTINE h5awrite_real_5
 
 
-          SUBROUTINE h5awrite_real_6(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5awrite_real_6
-!DEC$endif
+          SUBROUTINE h5awrite_real_6(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -813,11 +741,7 @@ CONTAINS
           END SUBROUTINE h5awrite_real_6
 
 
-          SUBROUTINE h5awrite_real_7(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5awrite_real_7
-!DEC$endif
+          SUBROUTINE h5awrite_real_7(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -849,11 +773,7 @@ CONTAINS
           END SUBROUTINE h5awrite_real_7
 
 
-          SUBROUTINE h5awrite_char_scalar(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5awrite_char_scalar
-!DEC$endif
+          SUBROUTINE h5awrite_char_scalar(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -882,11 +802,7 @@ CONTAINS
             hdferr = h5awritec_s_c(attr_id, memtype_id,  buf, dims)
           END SUBROUTINE h5awrite_char_scalar
 
-          SUBROUTINE h5awrite_char_1(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5awrite_char_1
-!DEC$endif
+          SUBROUTINE h5awrite_char_1(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -917,11 +833,7 @@ CONTAINS
           END SUBROUTINE h5awrite_char_1
 
 
-          SUBROUTINE h5awrite_char_2(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5awrite_char_2
-!DEC$endif
+          SUBROUTINE h5awrite_char_2(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -954,11 +866,7 @@ CONTAINS
           END SUBROUTINE h5awrite_char_2
 
 
-          SUBROUTINE h5awrite_char_3(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5awrite_char_3
-!DEC$endif
+          SUBROUTINE h5awrite_char_3(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -990,11 +898,7 @@ CONTAINS
           END SUBROUTINE h5awrite_char_3
 
 
-          SUBROUTINE h5awrite_char_4(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5awrite_char_4
-!DEC$endif
+          SUBROUTINE h5awrite_char_4(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1026,11 +930,7 @@ CONTAINS
           END SUBROUTINE h5awrite_char_4
 
 
-          SUBROUTINE h5awrite_char_5(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5awrite_char_5
-!DEC$endif
+          SUBROUTINE h5awrite_char_5(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1062,11 +962,7 @@ CONTAINS
           END SUBROUTINE h5awrite_char_5
 
 
-          SUBROUTINE h5awrite_char_6(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5awrite_char_6
-!DEC$endif
+          SUBROUTINE h5awrite_char_6(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1098,11 +994,7 @@ CONTAINS
           END SUBROUTINE h5awrite_char_6
 
 
-          SUBROUTINE h5awrite_char_7(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5awrite_char_7
-!DEC$endif
+          SUBROUTINE h5awrite_char_7(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1171,11 +1063,7 @@ CONTAINS
 !			up to 7 dimensions.	
 !----------------------------------------------------------------------
 
-          SUBROUTINE h5aread_integer_scalar(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aread_integer_scalar
-!DEC$endif
+          SUBROUTINE h5aread_integer_scalar(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1202,11 +1090,7 @@ CONTAINS
             hdferr = h5aread_integer_s_c(attr_id, memtype_id,  buf, dims)
           END SUBROUTINE h5aread_integer_scalar
 
-          SUBROUTINE h5aread_integer_1(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aread_integer_1
-!DEC$endif
+          SUBROUTINE h5aread_integer_1(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1235,11 +1119,7 @@ CONTAINS
           END SUBROUTINE h5aread_integer_1
 
 
-          SUBROUTINE h5aread_integer_2(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aread_integer_2
-!DEC$endif
+          SUBROUTINE h5aread_integer_2(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1268,11 +1148,7 @@ CONTAINS
           END SUBROUTINE h5aread_integer_2
 
 
-          SUBROUTINE h5aread_integer_3(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aread_integer_3
-!DEC$endif
+          SUBROUTINE h5aread_integer_3(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1303,11 +1179,7 @@ CONTAINS
           END SUBROUTINE h5aread_integer_3
 
 
-          SUBROUTINE h5aread_integer_4(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aread_integer_4
-!DEC$endif
+          SUBROUTINE h5aread_integer_4(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1339,11 +1211,7 @@ CONTAINS
           END SUBROUTINE h5aread_integer_4
 
 
-          SUBROUTINE h5aread_integer_5(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aread_integer_5
-!DEC$endif
+          SUBROUTINE h5aread_integer_5(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1375,11 +1243,7 @@ CONTAINS
           END SUBROUTINE h5aread_integer_5
 
 
-          SUBROUTINE h5aread_integer_6(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aread_integer_6
-!DEC$endif
+          SUBROUTINE h5aread_integer_6(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1411,11 +1275,7 @@ CONTAINS
           END SUBROUTINE h5aread_integer_6
 
 
-          SUBROUTINE h5aread_integer_7(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aread_integer_7
-!DEC$endif
+          SUBROUTINE h5aread_integer_7(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1447,11 +1307,7 @@ CONTAINS
           END SUBROUTINE h5aread_integer_7
 
 
-          SUBROUTINE h5aread_real_scalar(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aread_real_scalar
-!DEC$endif
+          SUBROUTINE h5aread_real_scalar(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1479,11 +1335,7 @@ CONTAINS
             hdferr = h5aread_real_s_c(attr_id, memtype_id,  buf, dims)
           END SUBROUTINE h5aread_real_scalar
 
-          SUBROUTINE h5aread_real_1(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aread_real_1
-!DEC$endif
+          SUBROUTINE h5aread_real_1(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1515,11 +1367,7 @@ CONTAINS
           END SUBROUTINE h5aread_real_1
 
 
-          SUBROUTINE h5aread_real_2(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aread_real_2
-!DEC$endif
+          SUBROUTINE h5aread_real_2(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1551,11 +1399,7 @@ CONTAINS
           END SUBROUTINE h5aread_real_2
 
 
-          SUBROUTINE h5aread_real_3(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aread_real_3
-!DEC$endif
+          SUBROUTINE h5aread_real_3(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1587,11 +1431,7 @@ CONTAINS
           END SUBROUTINE h5aread_real_3
 
 
-          SUBROUTINE h5aread_real_4(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aread_real_4
-!DEC$endif
+          SUBROUTINE h5aread_real_4(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1623,11 +1463,7 @@ CONTAINS
           END SUBROUTINE h5aread_real_4
 
 
-          SUBROUTINE h5aread_real_5(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aread_real_5
-!DEC$endif
+          SUBROUTINE h5aread_real_5(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1659,11 +1495,7 @@ CONTAINS
           END SUBROUTINE h5aread_real_5
 
 
-          SUBROUTINE h5aread_real_6(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aread_real_6
-!DEC$endif
+          SUBROUTINE h5aread_real_6(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1695,11 +1527,7 @@ CONTAINS
           END SUBROUTINE h5aread_real_6
 
 
-          SUBROUTINE h5aread_real_7(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aread_real_7
-!DEC$endif
+          SUBROUTINE h5aread_real_7(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1730,11 +1558,7 @@ CONTAINS
             hdferr = h5aread_real_7_c(attr_id, memtype_id,  buf, dims)
           END SUBROUTINE h5aread_real_7
 
-          SUBROUTINE h5aread_char_scalar(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aread_char_scalar
-!DEC$endif
+          SUBROUTINE h5aread_char_scalar(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1764,11 +1588,7 @@ CONTAINS
             hdferr = h5areadc_s_c(attr_id, memtype_id,  buf, dims)
           END SUBROUTINE h5aread_char_scalar
 
-          SUBROUTINE h5aread_char_1(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aread_char_1
-!DEC$endif
+          SUBROUTINE h5aread_char_1(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1801,11 +1621,7 @@ CONTAINS
           END SUBROUTINE h5aread_char_1
 
 
-          SUBROUTINE h5aread_char_2(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aread_char_2
-!DEC$endif
+          SUBROUTINE h5aread_char_2(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1838,11 +1654,7 @@ CONTAINS
           END SUBROUTINE h5aread_char_2
 
 
-          SUBROUTINE h5aread_char_3(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aread_char_3
-!DEC$endif
+          SUBROUTINE h5aread_char_3(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1875,11 +1687,7 @@ CONTAINS
           END SUBROUTINE h5aread_char_3
 
 
-          SUBROUTINE h5aread_char_4(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aread_char_4
-!DEC$endif
+          SUBROUTINE h5aread_char_4(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1912,11 +1720,7 @@ CONTAINS
           END SUBROUTINE h5aread_char_4
 
 
-          SUBROUTINE h5aread_char_5(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aread_char_5
-!DEC$endif
+          SUBROUTINE h5aread_char_5(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1949,11 +1753,7 @@ CONTAINS
           END SUBROUTINE h5aread_char_5
 
 
-          SUBROUTINE h5aread_char_6(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aread_char_6
-!DEC$endif
+          SUBROUTINE h5aread_char_6(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -1986,11 +1786,7 @@ CONTAINS
           END SUBROUTINE h5aread_char_6
 
 
-          SUBROUTINE h5aread_char_7(attr_id, memtype_id,  buf, dims, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aread_char_7
-!DEC$endif
+          SUBROUTINE h5aread_char_7(attr_id, memtype_id,  buf, dims, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
             INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
@@ -2047,11 +1843,7 @@ CONTAINS
 !
 !----------------------------------------------------------------------
 
-          SUBROUTINE h5aget_space_f(attr_id, space_id, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aget_space_f
-!DEC$endif
+          SUBROUTINE h5aget_space_f(attr_id, space_id, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id  ! Attribute identifier 
             INTEGER(HID_T), INTENT(OUT) :: space_id 
@@ -2099,11 +1891,7 @@ CONTAINS
 !
 !----------------------------------------------------------------------
 
-          SUBROUTINE h5aget_type_f(attr_id, type_id, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aget_type_f
-!DEC$endif
+          SUBROUTINE h5aget_type_f(attr_id, type_id, hdferr)
             IMPLICIT NONE
             INTEGER(HID_T), INTENT(IN) :: attr_id  ! Attribute identifier 
             INTEGER(HID_T), INTENT(OUT) :: type_id 
@@ -2153,11 +1941,7 @@ CONTAINS
 !----------------------------------------------------------------------
 
 
-  SUBROUTINE h5aget_name_f(attr_id, size, buf, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aget_name_f
-!DEC$endif
+  SUBROUTINE h5aget_name_f(attr_id, size, buf, hdferr)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: attr_id  ! Attribute identifier 
     INTEGER(SIZE_T), INTENT(IN) :: size    ! Buffer size 
@@ -2227,11 +2011,7 @@ CONTAINS
 !----------------------------------------------------------------------
 
   SUBROUTINE h5aget_name_by_idx_f(loc_id, obj_name, idx_type, order, &
-       n, name, hdferr, size, lapl_id) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aget_name_by_idx_f
-!DEC$endif
+       n, name, hdferr, size, lapl_id)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: loc_id      ! Identifer for object to which attribute is attached
     CHARACTER(LEN=*), INTENT(IN) :: obj_name  ! Name of object, relative to location,
@@ -2326,11 +2106,7 @@ CONTAINS
 !
 !----------------------------------------------------------------------
 
-  SUBROUTINE h5aget_num_attrs_f(obj_id, attr_num, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aget_num_attrs_f
-!DEC$endif
+  SUBROUTINE h5aget_num_attrs_f(obj_id, attr_num, hdferr)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: obj_id  ! Object identifier 
     INTEGER, INTENT(OUT) :: attr_num      ! Number of attributes of the
@@ -2380,11 +2156,7 @@ CONTAINS
 !
 !----------------------------------------------------------------------
 
-  SUBROUTINE h5adelete_f(obj_id, name, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5adelete_f
-!DEC$endif
+  SUBROUTINE h5adelete_f(obj_id, name, hdferr)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: obj_id    ! Object identifier 
     CHARACTER(LEN=*), INTENT(IN) :: name    ! Attribute name
@@ -2435,11 +2207,7 @@ CONTAINS
 !
 !----------------------------------------------------------------------
 
-  SUBROUTINE h5aclose_f(attr_id, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aclose_f
-!DEC$endif
+  SUBROUTINE h5aclose_f(attr_id, hdferr)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: attr_id  ! Attribute identifier 
     INTEGER, INTENT(OUT) :: hdferr         ! Error code:
@@ -2482,11 +2250,7 @@ CONTAINS
 !
 !----------------------------------------------------------------------
 
-  SUBROUTINE h5aget_storage_size_f(attr_id, size, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aget_storage_size_f
-!DEC$endif
+  SUBROUTINE h5aget_storage_size_f(attr_id, size, hdferr)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: attr_id  ! Attribute identifier  
     INTEGER(HSIZE_T), INTENT(OUT) :: size   ! Attribute storage requirement
@@ -2530,11 +2294,7 @@ CONTAINS
 !
 !----------------------------------------------------------------------
 
-  SUBROUTINE h5aget_create_plist_f(attr_id, creation_prop_id, hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aget_create_plist_f
-!DEC$endif
+  SUBROUTINE h5aget_create_plist_f(attr_id, creation_prop_id, hdferr)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: attr_id  ! Identifier of the attribute 
     INTEGER(HID_T), INTENT(OUT) :: creation_prop_id   ! Identifier for the attribute’s creation property
@@ -2583,12 +2343,7 @@ CONTAINS
 !----------------------------------------------------------------------
 
   SUBROUTINE h5arename_by_name_f(loc_id, obj_name, old_attr_name, new_attr_name, &
-        hdferr, lapl_id) 
-
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5arename_by_name_f
-!DEC$endif
+        hdferr, lapl_id)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: loc_id    ! Object identifier 
     CHARACTER(LEN=*), INTENT(IN) :: obj_name  ! Name of object, relative to location, 
@@ -2665,11 +2420,7 @@ CONTAINS
 !
 !----------------------------------------------------------------------
 
-  SUBROUTINE h5aopen_f(obj_id, attr_name, attr_id, hdferr, aapl_id) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aopen_f
-!DEC$endif
+  SUBROUTINE h5aopen_f(obj_id, attr_name, attr_id, hdferr, aapl_id)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: obj_id      ! Object identifier 
     CHARACTER(LEN=*), INTENT(IN) :: attr_name ! Attribute name
@@ -2745,11 +2496,7 @@ CONTAINS
 ! Modifications: N/A 
 !
 !----------------------------------------------------------------------
-  SUBROUTINE h5adelete_by_idx_f(loc_id, obj_name, idx_type, order, n, hdferr, lapl_id) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5adelete_by_idx_f
-!DEC$endif
+  SUBROUTINE h5adelete_by_idx_f(loc_id, obj_name, idx_type, order, n, hdferr, lapl_id)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: loc_id      ! Identifer for object to which attribute is attached
     CHARACTER(LEN=*), INTENT(IN) :: obj_name  ! Name of object, relative to location, 
@@ -2825,11 +2572,7 @@ CONTAINS
 ! Modifications: N/A 
 !
 !----------------------------------------------------------------------
-  SUBROUTINE h5adelete_by_name_f(loc_id, obj_name, attr_name, hdferr, lapl_id) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5adelete_by_name_f
-!DEC$endif
+  SUBROUTINE h5adelete_by_name_f(loc_id, obj_name, attr_name, hdferr, lapl_id)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: loc_id      ! Identifer for object to which attribute is attached
     CHARACTER(LEN=*), INTENT(IN) :: obj_name  ! Name of object, relative to location, 
@@ -2897,11 +2640,7 @@ CONTAINS
 !
 !----------------------------------------------------------------------
 
-  SUBROUTINE h5aopen_by_idx_f(loc_id, obj_name, idx_type, order, n, attr_id, hdferr, aapl_id, lapl_id) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aopen_by_idx_f
-!DEC$endif
+  SUBROUTINE h5aopen_by_idx_f(loc_id, obj_name, idx_type, order, n, attr_id, hdferr, aapl_id, lapl_id)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: loc_id      ! Object identifier
     CHARACTER(LEN=*), INTENT(IN) :: obj_name  ! Name of object to which attribute is attached
@@ -2990,11 +2729,7 @@ CONTAINS
 !
 !----------------------------------------------------------------------
 
-  SUBROUTINE h5aget_info_f(attr_id, f_corder_valid, corder, cset, data_size,  hdferr) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aget_info_f
-!DEC$endif
+  SUBROUTINE h5aget_info_f(attr_id, f_corder_valid, corder, cset, data_size,  hdferr)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: attr_id  ! Attribute identifier
 
@@ -3063,11 +2798,7 @@ CONTAINS
 !
 !----------------------------------------------------------------------
   SUBROUTINE h5aget_info_by_idx_f(loc_id, obj_name, idx_type, order, n, &
-       f_corder_valid, corder, cset, data_size, hdferr, lapl_id) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aget_info_by_idx_f
-!DEC$endif
+       f_corder_valid, corder, cset, data_size, hdferr, lapl_id)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: loc_id    ! Object identifier
     CHARACTER(LEN=*), INTENT(IN) :: obj_name ! Name of object to which attribute is attached
@@ -3161,11 +2892,7 @@ CONTAINS
 !
 !----------------------------------------------------------------------
   SUBROUTINE h5aget_info_by_name_f(loc_id, obj_name, attr_name, &
-       f_corder_valid, corder, cset, data_size, hdferr, lapl_id) 
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aget_info_by_name_f
-!DEC$endif
+       f_corder_valid, corder, cset, data_size, hdferr, lapl_id)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: loc_id    ! Object identifier
     CHARACTER(LEN=*), INTENT(IN) :: obj_name ! Name of object to which attribute is attached
@@ -3252,12 +2979,6 @@ CONTAINS
 !----------------------------------------------------------------------
   SUBROUTINE h5acreate_by_name_f(loc_id, obj_name, attr_name, type_id, space_id, attr, hdferr, &
        acpl_id, aapl_id, lapl_id)
-
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5acreate_by_name_f
-!DEC$endif
-
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: loc_id    ! Object identifier
     CHARACTER(LEN=*), INTENT(IN) :: obj_name ! Name of object to which attribute is attached
@@ -3344,12 +3065,6 @@ CONTAINS
 !
 !----------------------------------------------------------------------
   SUBROUTINE h5aexists_f(obj_id, attr_name, attr_exists, hdferr)
-
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aexists_f
-!DEC$endif
-
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: obj_id     ! Object identifier
     CHARACTER(LEN=*), INTENT(IN) :: attr_name ! Attribute name
@@ -3408,12 +3123,6 @@ CONTAINS
 !
 !----------------------------------------------------------------------
   SUBROUTINE h5aexists_by_name_f(loc_id, obj_name, attr_name, attr_exists, hdferr, lapl_id)
-
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5aexists_by_name_f
-!DEC$endif
-
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: loc_id    ! Location identifier
     CHARACTER(LEN=*), INTENT(IN) :: obj_name ! Object name either relative to loc_id, 
@@ -3485,12 +3194,6 @@ CONTAINS
 !
 !----------------------------------------------------------------------
   SUBROUTINE h5aopen_by_name_f(loc_id, obj_name, attr_name, attr_id, hdferr, aapl_id, lapl_id)
-
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport ::  h5aopen_by_name_f
-!DEC$endif
-
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: loc_id    ! Location identifier
     CHARACTER(LEN=*), INTENT(IN) :: obj_name ! Object name either relative to loc_id, 
@@ -3564,12 +3267,7 @@ CONTAINS
 !
 !----------------------------------------------------------------------
 
-  SUBROUTINE h5arename_f(loc_id, old_attr_name, new_attr_name, hdferr) 
-
-!This definition is needed for Windows DLLs
-!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5arename_f
-!DEC$endif
+  SUBROUTINE h5arename_f(loc_id, old_attr_name, new_attr_name, hdferr)
     IMPLICIT NONE
     INTEGER(HID_T), INTENT(IN) :: loc_id    ! Object identifier
     CHARACTER(LEN=*), INTENT(IN) :: old_attr_name ! Prior attribute name