[mpich2-commits] r6675 - mpich2/trunk/src/mpi/init

[goodell at mcs.anl.gov]

Author: goodell
Date: 2010-05-18 15:37:16 -0500 (Tue, 18 May 2010)
New Revision: 6675

Modified:
   mpich2/trunk/src/mpi/init/initthread.c
Log:
bug fix for r6664: CS_FINALIZE should only be called on failure

No reviewer.

Modified: mpich2/trunk/src/mpi/init/initthread.c
===================================================================
--- mpich2/trunk/src/mpi/init/initthread.c	2010-05-18 20:37:15 UTC (rev 6674)
+++ mpich2/trunk/src/mpi/init/initthread.c	2010-05-18 20:37:16 UTC (rev 6675)
@@ -465,11 +465,12 @@
 
 fn_exit:
     MPIU_THREAD_CS_EXIT(INIT,required);
-    MPIU_THREAD_CS_FINALIZE;
     return mpi_errno;
 
 fn_fail:
-    goto fn_exit;
+    MPIU_THREAD_CS_EXIT(INIT,required);
+    MPIU_THREAD_CS_FINALIZE;
+    return mpi_errno;
 }
 #endif