From 5ed3e8a4a773d59b9d8c731551bf7ede05de0fd2 Mon Sep 17 00:00:00 2001
From: Scot Breitenfeld <brtnfld@hdfgroup.org>
Date: Wed, 8 Jul 2015 16:10:13 -0500
Subject: [svn-r27354] fixed #if spec

---
 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 3d954af..3d5f812 100644
--- a/fortran/src/H5_ff.F90
+++ b/fortran/src/H5_ff.F90
@@ -394,7 +394,7 @@ CONTAINS
           h5_type = H5T_NATIVE_REAL_C_LONG_DOUBLE
 #endif
 #if H5_PAC_FC_MAX_REAL_PRECISION > 28 
-#if H5_HAVE_FLOAT128 = 1
+#if H5_HAVE_FLOAT128 == 1
        ELSE IF(kind.EQ.Fortran_REAL_C_FLOAT128)THEN
           h5_type = H5T_NATIVE_FLOAT_128
 #endif
-- 
cgit v0.12