Changeset 986 for trunk/optimizer/src/pgapack/pgapack/source/pga.c

Timestamp:

Apr 2, 2008, 2:32:58 PM (16 years ago)

Author:

gah

Message:

added global pgapack_abort flag to plugin and abort operation to optimizer

File:

• trunk/optimizer/src/pgapack/pgapack/source/pga.c (modified) (2 diffs)

trunk/optimizer/src/pgapack/pgapack/source/pga.c

@@ -71 +71 @@
 
 #include "pgapack.h"
+#include <setjmp.h>
+
+jmp_buf pgapack_jmpbuf;
 
 /*U****************************************************************************
@@ -112 +115 @@
      ndemes = PGAGetNumDemes    (ctx);
 
+    if (setjmp(pgapack_jmpbuf)) {
+        return;                 /* PGA pack was aborted. */
+    }
      /**********************************************************************/
      /*              Global model, one island, one deme                    */
      /**********************************************************************/
-     if     ( (npops == 1) && (ndemes == 1) ) {
-
+     if ( (npops == 1) && (ndemes == 1) ) {
          PGARunGM(ctx, evaluate, comm);
      }