- lloutbuf[0] = 0;
- lloutbuf[1] = 1;
- lloutbuf[2] = 1;
- if (MPI_LONG_LONG != MPI_DATATYPE_NULL) {
- MTestPrintfMsg( 10, "Reduce of MPI_LONG_LONG\n" );
- rc = MPI_Reduce( llinbuf, lloutbuf, 3, MPI_LONG_LONG, MPI_BOR, 0, comm );
- if (rc) {
- MTestPrintErrorMsg( "MPI_BOR and MPI_LONG_LONG", rc );
- errs++;
- }
- else {
- if (rank == 0) {
- if (lloutbuf[0] != 0xffffffff) {
- errs++;
- fprintf( stderr, "long long BOR(1) test failed\n" );
- }
- if (lloutbuf[1]) {
- errs++;
- fprintf( stderr, "long long BOR(0) test failed\n" );
- }
- if (lloutbuf[2] != 0xffffffff && size > 1) {
- errs++;
- fprintf( stderr, "long long BOR(>) test failed\n" );
- }
- }
- }
- }
+ lloutbuf[0] = 0;
+ lloutbuf[1] = 1;
+ lloutbuf[2] = 1;
+ if (MPI_LONG_LONG != MPI_DATATYPE_NULL) {
+ MTestPrintfMsg(10, "Reduce of MPI_LONG_LONG\n");
+ rc = MPI_Reduce(llinbuf, lloutbuf, 3, MPI_LONG_LONG, MPI_BOR, 0, comm);
+ if (rc) {
+ MTestPrintErrorMsg("MPI_BOR and MPI_LONG_LONG", rc);
+ errs++;
+ }
+ else {
+ if (rank == 0) {
+ if (lloutbuf[0] != 0xffffffff) {
+ errs++;
+ fprintf(stderr, "long long BOR(1) test failed\n");
+ }
+ if (lloutbuf[1]) {
+ errs++;
+ fprintf(stderr, "long long BOR(0) test failed\n");
+ }
+ if (lloutbuf[2] != 0xffffffff && size > 1) {
+ errs++;
+ fprintf(stderr, "long long BOR(>) test failed\n");
+ }
+ }
+ }
+ }