summaryrefslogtreecommitdiffstats
path: root/fortran
diff options
context:
space:
mode:
authorScott Wegner <swegner@hdfgroup.org>2008-05-12 18:14:12 (GMT)
committerScott Wegner <swegner@hdfgroup.org>2008-05-12 18:14:12 (GMT)
commit2fd80deb4d36491b4d007634dbae8fe32081e4ca (patch)
tree7e1618f9ce645295f581f63f8bad823d3738d26d /fortran
parentf9835e10193f036b50b03edd875d98e9aa11af23 (diff)
downloadhdf5-2fd80deb4d36491b4d007634dbae8fe32081e4ca.zip
hdf5-2fd80deb4d36491b4d007634dbae8fe32081e4ca.tar.gz
hdf5-2fd80deb4d36491b4d007634dbae8fe32081e4ca.tar.bz2
[svn-r14975] Purpose: Add Windows fixes for new Fortran code.
Description: There were a number of small tweaks we needed to make to add the new fortran_1_8 code on Windows. We create new project files, add new source to them, add the test to our test suite, and fix a few typos in the Windows-specific source code. Tested: VS2005 on WinXP
Diffstat (limited to 'fortran')
-rw-r--r--fortran/src/H5Lff.f902
-rw-r--r--fortran/src/H5Pff.f902
-rw-r--r--fortran/test/tf.f902
3 files changed, 3 insertions, 3 deletions
diff --git a/fortran/src/H5Lff.f90 b/fortran/src/H5Lff.f90
index 1f7bceb..98d7729 100644
--- a/fortran/src/H5Lff.f90
+++ b/fortran/src/H5Lff.f90
@@ -55,7 +55,7 @@ CONTAINS
!
!This definition is needed for Windows DLLs
!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5lcopy
+!DEC$attributes dllexport :: h5lcopy_f
!DEC$endif
!
IMPLICIT NONE
diff --git a/fortran/src/H5Pff.f90 b/fortran/src/H5Pff.f90
index 8e5c420..d24f79d 100644
--- a/fortran/src/H5Pff.f90
+++ b/fortran/src/H5Pff.f90
@@ -7120,7 +7120,7 @@
!
!This definition is needed for Windows DLLs
!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: h5pset_attr_creation_order_f
+!DEC$attributes dllexport :: h5pset_char_encoding_f
!DEC$endif
!
IMPLICIT NONE
diff --git a/fortran/test/tf.f90 b/fortran/test/tf.f90
index eb033b6..1cbac24 100644
--- a/fortran/test/tf.f90
+++ b/fortran/test/tf.f90
@@ -64,7 +64,7 @@ END SUBROUTINE verifyLogical
!This definition is needed for Windows DLLs
!DEC$if defined(BUILD_HDF5_DLL)
-!DEC$attributes dllexport :: verifyLogical
+!DEC$attributes dllexport :: verifyString
!DEC$endif
SUBROUTINE verifyString(string, value,correct_value,total_error)
CHARACTER(LEN=*) :: string