Skip to content

Commit

Permalink
update for new API module
Browse files Browse the repository at this point in the history
  • Loading branch information
t-bltg committed Sep 30, 2022
1 parent 48ba6b4 commit 73139c5
Showing 1 changed file with 3 additions and 5 deletions.
8 changes: 3 additions & 5 deletions src/datatypes.jl
Original file line number Diff line number Diff line change
Expand Up @@ -249,7 +249,7 @@ function create_vector(count::Integer, blocklength::Integer, stride::Integer, ol
end
function create_vector!(newtype::Datatype, count::Integer, blocklength::Integer, stride::Integer, oldtype::Datatype)
# int MPI_Type_vector(int count, int blocklength, int stride,
# MPI_Datatype oldtype, MPI_Datatype *newtype)
# MPI_Datatype oldtype, MPI_Datatype *newtype)
API.MPI_Type_vector(count, blocklength, stride, oldtype, newtype)
return newtype
end
Expand Down Expand Up @@ -278,10 +278,8 @@ function create_hvector(count::Integer, blocklength::Integer, stride::Integer, o
end
function create_hvector!(newtype::Datatype, count::Integer, blocklength::Integer, stride::Integer, oldtype::Datatype)
# int MPI_Type_create_hvector(int count, int blocklength, MPI_Aint stride,
# MPI_Datatype oldtype, MPI_Datatype *newtype)
@mpichk ccall((:MPI_Type_create_hvector, libmpi), Cint,
(Cint, Cint, Cint, MPI_Datatype, Ptr{MPI_Datatype}),
count, blocklength, MPI_Aint(stride), oldtype, newtype)
# MPI_Datatype oldtype, MPI_Datatype *newtype)
API.MPI_Type_create_hvector(count, blocklength, MPI_Aint(stride), oldtype, newtype)
return newtype
end

Expand Down

0 comments on commit 73139c5

Please sign in to comment.