From 3037cad73421220f0830feb5074943779ab8ca6a Mon Sep 17 00:00:00 2001
From: Albert Cheng <acheng@hdfgroup.org>
Date: Thu, 13 Dec 2001 09:04:47 -0500
Subject: [svn-r4714] Purpose:     Bug fix Description:     Fixed a previous
 commit that introduced an undeclared variable error. Platforms tested:    
 eirene (serial, pp), modi4(pp)

---
 src/H5Smpio.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/H5Smpio.c b/src/H5Smpio.c
index a473c8c..e6cc074 100644
--- a/src/H5Smpio.c
+++ b/src/H5Smpio.c
@@ -155,6 +155,7 @@ H5S_mpio_hyper_type( const H5S_t *space, const size_t elmt_size,
     } d[H5S_MAX_RANK];
 
     int			i, err, new_rank, num_to_collapse;
+    herr_t		ret_value = SUCCEED;
     int			offset[H5S_MAX_RANK];
     int			max_xtent[H5S_MAX_RANK];
     H5S_hyper_dim_t	*diminfo;		/* [rank] */
@@ -437,7 +438,7 @@ done:
     HDfprintf(stdout, "Leave %s, count=%Hu  is_derived_type=%d\n",
 		FUNC, *count, *is_derived_type );
 #endif
-    FUNC_LEAVE (SUCCEED);
+    FUNC_LEAVE (ret_value);
 }
 
 
-- 
cgit v0.12