6 This is a test program to see if command line arguments are handled
7 well. Note that MPI doesn't *require* anything here, so this is
8 simply used to acess "quality of implementation"
11 a "b c" "d'e" 'f"g" h'
13 int main( int argc, char *argv[] )
15 int i, rank, toterr, err = 0;
16 static char *eargv[5];
21 eargv[4] = "f\"g\" h";
23 MPI_Init( &argc, &argv );
25 for (i=1; i<=4; i++) {
27 printf( "Argument %d is null!\n", i );
31 MPI_Allreduce( &err, &toterr, 1, MPI_INT, MPI_SUM, MPI_COMM_WORLD );
33 MPI_Abort( 1, MPI_COMM_WORLD );
37 /* a "b c" "d'e" 'f"g" h' */
38 for (i=1; i<=4; i++) {
39 if (strcmp( argv[i], eargv[i] ) != 0) {
41 printf( "Found %s but expected %s\n", argv[i], eargv[i] );
44 MPI_Allreduce( &err, &toterr, 1, MPI_INT, MPI_SUM, MPI_COMM_WORLD );
46 MPI_Comm_rank( MPI_COMM_WORLD, &rank );
48 if (toterr) printf( "Found %d errors\n", toterr );
49 else printf( " No Errors\n" );