diff options
| author | Scott Wegner <swegner@hdfgroup.org> | 2008-09-03 15:01:28 (GMT) |
|---|---|---|
| committer | Scott Wegner <swegner@hdfgroup.org> | 2008-09-03 15:01:28 (GMT) |
| commit | 442565636a5c638c40f882af087c0e92c52753f3 (patch) | |
| tree | aa042e78f22e9df6d266faa05a9e1d1538b62a0d /fortran/src/H5Zff.f90 | |
| parent | 39b9ddf4c8da6d815bd1d81382d480092020b57e (diff) | |
| download | hdf5-442565636a5c638c40f882af087c0e92c52753f3.zip hdf5-442565636a5c638c40f882af087c0e92c52753f3.tar.gz hdf5-442565636a5c638c40f882af087c0e92c52753f3.tar.bz2 | |
[svn-r15583] Purpose: Add Windows Fortran DLL export code to separate DEF file.
Description:
In in Fortran source code, there was a great deal of code that was necessary for Windows DLLs, and ignored for others systems. To remove some of the bloat in the source code, we moved these definitions into separate *.def file, which will be used on by the Windows DLL project.
Tested:
VS2005 on WinXP
Note: The Windows project file will still need to be edited-- I will check that in soon.
Diffstat (limited to 'fortran/src/H5Zff.f90')
| -rw-r--r-- | fortran/src/H5Zff.f90 | 12 |
1 files changed, 0 insertions, 12 deletions
diff --git a/fortran/src/H5Zff.f90 b/fortran/src/H5Zff.f90 index d821670..553722f 100644 --- a/fortran/src/H5Zff.f90 +++ b/fortran/src/H5Zff.f90 @@ -48,10 +48,6 @@ SUBROUTINE h5zunregister_f(filter, hdferr) ! !This definition is needed for Windows DLLs -!DEC$if defined(BUILD_HDF5_DLL) -!DEC$attributes dllexport :: h5zunregister_f -!DEC$endif -! IMPLICIT NONE INTEGER, INTENT(IN) :: filter INTEGER, INTENT(OUT) :: hdferr ! Error code @@ -95,10 +91,6 @@ SUBROUTINE h5zfilter_avail_f(filter, status, hdferr) ! !This definition is needed for Windows DLLs -!DEC$if defined(BUILD_HDF5_DLL) -!DEC$attributes dllexport :: h5zfilter_avail_f -!DEC$endif -! IMPLICIT NONE INTEGER, INTENT(IN) :: filter ! Filter; may be one of the following: @@ -159,10 +151,6 @@ SUBROUTINE h5zget_filter_info_f(filter, config_flags, hdferr) ! !This definition is needed for Windows DLLs -!DEC$if defined(BUILD_HDF5_DLL) -!DEC$attributes dllexport :: h5zget_filter_info_f -!DEC$endif -! IMPLICIT NONE INTEGER, INTENT(IN) :: filter ! Filter; may be one of the following: |