ompi: cleanup environment at finalize

ggouaillardet · ggouaillardet · commit 981dccab8d33 · 2016-10-28T09:32:30.000+09:00
Signed-off-by: Gilles Gouaillardet &lt;gilles@rist.or.jp&gt;
diff --git a/ompi/runtime/ompi_mpi_finalize.c b/ompi/runtime/ompi_mpi_finalize.c
@@ -494,6 +494,10 @@ int ompi_mpi_finalize(void)
         opal_class_finalize();
     }
 
+    /* cleanup environment */
+    opal_unsetenv("OMPI_COMMAND", &environ);
+    opal_unsetenv("OMPI_ARGV", &environ);
+
     /* All done */
 
  done:

Original file line number	Diff line number	Diff line change
`@@ -494,6 +494,10 @@ int ompi_mpi_finalize(void)`
`494`	`494`	`opal_class_finalize();`
`495`	`495`	`}`
`496`	`496`
	`497`	`+ /* cleanup environment */`
	`498`	`+ opal_unsetenv("OMPI_COMMAND", &environ);`
	`499`	`+ opal_unsetenv("OMPI_ARGV", &environ);`
	`500`	`+`
`497`	`501`	`/* All done */`
`498`	`502`
`499`	`503`	`done:`