Revision fb94cc59c598ba13db693fec344a0282d373b88e authored by Simon Byrne on 26 June 2019, 04:58:42 UTC, committed by Simon Byrne on 26 June 2019, 04:58:48 UTC
1 parent f689ed5
test_exscan.jl
using Test
using MPI
MPI.Init()
comm = MPI.COMM_WORLD
size = MPI.Comm_size(comm)
rank = MPI.Comm_rank(comm)
# Not possible to PROD a Char (and neither Int8 with OpenMPI)
typs = setdiff([Base.uniontypes(MPI.MPIDatatype)...], [Char, Int8, UInt8])
for typ in typs
val = convert(typ,rank+1)
B = MPI.Exscan(val, MPI.PROD, comm)
if rank > 0
@test B[1] === convert(typ, prod(1:rank))
end
end
MPI.Finalize()
@test MPI.Finalized()
Computing file changes ...