From c6c7a21bf0323bef8add000a4fe92a8f4a79e6f2 Mon Sep 17 00:00:00 2001 From: Elena Pourmal Date: Fri, 18 Oct 2002 11:11:14 -0500 Subject: [svn-r6013] Purpose: Bug fix Description: There was a typo in the h5dont_exit_c function name that caused compilation problems on Windows Solution: Fixed typo Platforms tested: Kent is going to retest it on Windows. --- fortran/src/H5_ff.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/fortran/src/H5_ff.f90 b/fortran/src/H5_ff.f90 index 709949d..6af524a 100644 --- a/fortran/src/H5_ff.f90 +++ b/fortran/src/H5_ff.f90 @@ -339,7 +339,7 @@ INTERFACE INTEGER FUNCTION h5dont_atexit_c() !DEC$ IF DEFINED(HDF5F90_WINDOWS) - !MS$ATTRIBUTES C,reference,alias:'_H5dont_atexit_C'::h5dont_atexit_c + !MS$ATTRIBUTES C,reference,alias:'_H5DONT_ATEXIT_C'::h5dont_atexit_c !DEC$ ENDIF END FUNCTION h5dont_atexit_c END INTERFACE -- cgit v0.12