ERROR: 0032-184 on AIX5.3

[Robert Latham]

On Thu, Oct 26, 2006 at 10:12:22AM +0200, Patrick Jöckel wrote:
> I successfully installed parallel-netcdf-1.0.1 on an IBM with AIX5.3.
> However, when I run "ncmpidump" (or the tests like "poe ./nf_test -c" )
> I always get (at the end) the message
> 
>       ERROR: 0032-184 MPI was not finalized  in routine unknown, task 0

Thanks for the bug report.  ncmpidump was definitely not calling
MPI_Finalize.  We forgot the call to MPI_Finalize() in old versions of
nf_test, but that's been fixed for several years now. 

> Is this problem (and the solution) known ?

Please try the attached patch.  It will address the lack of
MPI_Finalize in ncmpidump.   We might have to do some digging for
nf_test: that one really does call MPI_Finalize, so I'm not sure why
you'd be getting that error.

==rob

-- 
Rob Latham
Mathematics and Computer Science Division    A215 0178 EA2D B059 8CDF
Argonne National Lab, IL USA                 B29D F333 664A 4280 315B
-------------- next part --------------
Index: src/utils/ncdump/ncdump.c
===================================================================
RCS file: /homes/gropp/cvsMaster_z/parallel-netcdf/src/utils/ncdump/ncdump.c,v
retrieving revision 1.4
diff -u -w -p -r1.4 ncdump.c
--- src/utils/ncdump/ncdump.c	23 Dec 2004 19:31:02 -0000	1.4
+++ src/utils/ncdump/ncdump.c	26 Oct 2006 15:36:48 -0000
@@ -722,6 +722,8 @@ main(int argc, char *argv[])
 	if (argc > 0)
 	  do_ncdump(argv[i], &fspec);
     } while (++i < argc);
+
+    MPI_Finalize();
 #ifdef vms
     exit(EXIT_SUCCESS);
 #else
Index: src/utils/ncgen/genlib.c
===================================================================
RCS file: /homes/gropp/cvsMaster_z/parallel-netcdf/src/utils/ncgen/genlib.c,v
retrieving revision 1.5
diff -u -w -p -r1.5 genlib.c
--- src/utils/ncgen/genlib.c	5 Dec 2005 22:43:08 -0000	1.5
+++ src/utils/ncgen/genlib.c	26 Oct 2006 15:48:25 -0000
@@ -1242,6 +1242,7 @@ cl_c(void)
 {
     cline("   stat = ncmpi_close(ncid);");
     cline("   check_err(stat,__LINE__,__FILE__);");
+    cline("   MPI_Finalize();");
 #ifndef vms
     cline("   return 0;");
 #else
Index: src/utils/ncgen/main.c
===================================================================
RCS file: /homes/gropp/cvsMaster_z/parallel-netcdf/src/utils/ncgen/main.c,v
retrieving revision 1.4
diff -u -w -p -r1.4 main.c
--- src/utils/ncgen/main.c	23 Dec 2004 19:31:04 -0000	1.4
+++ src/utils/ncgen/main.c	26 Oct 2006 15:43:03 -0000
@@ -78,6 +78,7 @@ main(
     extern int opterr;
     extern char *optarg;
     int c;
+    int ret;
     FILE *fp;
 
     MPI_Init(&argc, &argv);
@@ -206,5 +207,7 @@ main(
 	cdlname = argv[0];
     }
     yyin = fp;
-    return (yyparse());
+    ret = yyparse();
+    MPI_Finalize();
+    return (ret());
 }