Skip to content

Commit

Permalink
Fix missing test logic for sum into x
Browse files Browse the repository at this point in the history
  • Loading branch information
pbartholomew08 committed Jun 28, 2024
1 parent 3a75900 commit b2eb6ce
Showing 1 changed file with 2 additions and 0 deletions.
2 changes: 2 additions & 0 deletions tests/test_sum_intox.f90
Original file line number Diff line number Diff line change
Expand Up @@ -109,6 +109,8 @@ subroutine runtest(test, dir_from)

if ((minval(a%data) /= 0) .or. (maxval(a%data) /= 0)) then
check_pass = .false.
else
check_pass = .true.
end if
call MPI_Allreduce(MPI_IN_PLACE, check_pass, 1, &
MPI_LOGICAL, MPI_LAND, MPI_COMM_WORLD, &
Expand Down

0 comments on commit b2eb6ce

Please sign in to comment.