From 4908f8bbd25aba459f2e72593e24a0c428c041b5 Mon Sep 17 00:00:00 2001
From: nic <nic>
Date: Thu, 24 Feb 2005 16:35:41 +0000
Subject: [PATCH] init the mpi layer earlier to prevent unknown options when
 run with a real mpi layer. mpi init taken from write_append_truncate

---
 lustre/tests/write_disjoint.c | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/lustre/tests/write_disjoint.c b/lustre/tests/write_disjoint.c
index c9ffae6..fb49be3 100644
--- a/lustre/tests/write_disjoint.c
+++ b/lustre/tests/write_disjoint.c
@@ -42,6 +42,7 @@ void rprintf(int rank, int loop, const char *fmt, ...)
 int main (int argc, char *argv[]) {
          int i, n, fd, chunk_size, file_size;
          int rank, noProcessors, done;
+         int error;
          off_t offset;
          char **chunk_buf;
          char *read_buf, c;
@@ -49,6 +50,9 @@ int main (int argc, char *argv[]) {
          ssize_t ret;
          char *filename = "/mnt/lustre/write_disjoint";
 
+        error = MPI_Init(&argc, &argv);
+        if (error != MPI_SUCCESS)
+                rprintf(-1, -1, "MPI_Init failed: %d\n", error);
         /* Parse command line options */
         while (1) {
                 c = getopt(argc, argv, "f:");
@@ -62,7 +66,6 @@ int main (int argc, char *argv[]) {
                 }
         }
 
-         MPI_Init(&argc, &argv);
          MPI_Comm_size(MPI_COMM_WORLD, &noProcessors);
          MPI_Comm_rank(MPI_COMM_WORLD, &rank);
                          
-- 
1.8.3.1