[svn-r9475] Purpose:

New feature: support fortran DLL on windows.
small bug fix.

Description:
1. Need to add macro for some functions in order to make fortran DLL work.
2. One routine(verify) missed the special macro DEC FORTRAN needs. Added.

Solution:

Platforms tested:
windows XP with MC VC6.0+Dec 6.6c.
Linux 2.4
and h5committest not finished yet.

Misc. update:
This commit is contained in:
MuQun Yang 2004-10-27 17:46:14 -05:00
parent babfbc2f9d
commit a457cd03e7
2 changed files with 7 additions and 2 deletions

View File

@ -29,8 +29,8 @@ char *h5_fixname(const char *base_name, hid_t fapl, char *fullname, size_t size)
# define nh5_cleanup_c FNAME(h5_cleanup_c)
#endif /* DF_CAPFNAMES */
H5_DLL int_f nh5_fixname_c
H5_FCTESTDLL int_f nh5_fixname_c
(_fcd base_name, int_f *base_namelen, hid_t_f *fapl, _fcd full_name, int_f *full_namelen);
H5_DLL int_f nh5_cleanup_c
H5_FCTESTDLL int_f nh5_cleanup_c
(_fcd base_name, int_f *base_namelen, hid_t_f *fapl);

View File

@ -32,6 +32,11 @@
RETURN
END SUBROUTINE check
!This definition is needed for Windows DLLs
!DEC$if defined(BUILD_HDF5_DLL)
!DEC$attributes dllexport :: verify
!DEC$endif
SUBROUTINE verify(string,value,correct_value,total_error)
CHARACTER(LEN=*) :: string
INTEGER :: value, correct_value, total_error