From 29b3bd1fe0a5ab01df072d411ac8b0339fd3ff20 Mon Sep 17 00:00:00 2001
From: Elena Pourmal <epourmal@hdfgroup.org>
Date: Tue, 1 Jul 2003 12:24:07 -0500
Subject: [svn-r7133] Purpose: Typo fix

Description: When Quincey and I updated Fortran SZIP flags, we accidentally
             renamed one of the C flags H5_SZIP_ALLOW_K13_OPTION_MASK used
             by Fortran C-stub routine.

Solution: Fix the typo.

Platforms tested: Linux 2.5 and True64

Misc. update:
---
 fortran/src/H5_f.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/fortran/src/H5_f.c b/fortran/src/H5_f.c
index a66b826..e5601b9 100644
--- a/fortran/src/H5_f.c
+++ b/fortran/src/H5_f.c
@@ -405,7 +405,7 @@ int_f
 nh5init1_flags_c(int_f *h5lib_flags)
 {
     int ret_value = -1;
-    unsigned prm_1 = H5_SZIP_AK13_OPTION_MASK;
+    unsigned prm_1 = H5_SZIP_ALLOW_K13_OPTION_MASK;
     unsigned prm_2 = H5_SZIP_CHIP_OPTION_MASK;
     unsigned prm_3 = H5_SZIP_EC_OPTION_MASK;
     unsigned prm_4 = H5_SZIP_NN_OPTION_MASK;
-- 
cgit v0.12