Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
dkrz-sw
yaxt
Commits
d88ba9be
Commit
d88ba9be
authored
Jun 03, 2021
by
Thomas Jahns
🤸
Browse files
Merge temporary buffers.
parent
d056c4cf
Changes
1
Hide whitespace changes
Inline
Side-by-side
src/xt_mpi.c
View file @
d88ba9be
...
...
@@ -579,8 +579,9 @@ parse_stripe(const struct Xt_offset_ext *v, size_t vlen, MPI_Datatype old_type)
/* [set_start,set_end) describes the prefix of non-matching
* elements in v that then need to be handled with gen_fallback_type */
size_t
set_start
=
0
,
set_end
=
0
;
MPI_Datatype
*
restrict
wdt
=
xmalloc
(
sizeof
(
*
wdt
)
*
(
size_t
)
vlen
);
int
*
restrict
wdisp
=
xmalloc
(
sizeof
(
*
wdisp
)
*
(
size_t
)
vlen
);
MPI_Datatype
*
restrict
wdt
=
xmalloc
(
sizeof
(
*
wdt
)
*
(
size_t
)
vlen
+
sizeof
(
int
)
*
(
size_t
)
vlen
);
int
*
restrict
wdisp
=
(
int
*
)(
wdt
+
vlen
);
/* [p,vlen) is the part of v that still needs matching performed */
/* m is the index of the next datatype and displacements to write
* to wdt and wdisp respectively */
...
...
@@ -636,7 +637,6 @@ parse_stripe(const struct Xt_offset_ext *v, size_t vlen, MPI_Datatype old_type)
}
xt_mpi_call
(
MPI_Type_commit
(
&
result_dt
),
Xt_default_comm
);
free
(
wdt
);
free
(
wdisp
);
return
result_dt
;
}
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment