Skip to content
This repository was archived by the owner on Sep 30, 2022. It is now read-only.

Commit ca6a4b0

Browse files
committed
ompi/win: use type int* for MPI_WIN_DISP_UNIT, MPI_WIN_CREATE_FLAVOR and MPI_WIN_MODEL
Thanks Alastair McKinstry for the report. (cherry picked from commit open-mpi/ompi@d08fb46)
1 parent ef1afb5 commit ca6a4b0

File tree

1 file changed

+4
-4
lines changed

1 file changed

+4
-4
lines changed

ompi/win/win.c

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -14,7 +14,7 @@
1414
* Copyright (c) 2009-2012 Cisco Systems, Inc. All rights reserved.
1515
* Copyright (c) 2013-2015 Los Alamos National Security, LLC. All rights
1616
* reserved.
17-
* Copyright (c) 2015 Research Organization for Information Science
17+
* Copyright (c) 2015-2016 Research Organization for Information Science
1818
* and Technology (RIST). All rights reserved.
1919
* $COPYRIGHT$
2020
*
@@ -167,18 +167,18 @@ config_window(void *base, size_t size, int disp_unit,
167167
MPI_WIN_SIZE, size, true);
168168
if (OMPI_SUCCESS != ret) return ret;
169169

170-
ret = ompi_attr_set_fortran_mpi2(WIN_ATTR, win,
170+
ret = ompi_attr_set_fortran_mpi1(WIN_ATTR, win,
171171
&win->w_keyhash,
172172
MPI_WIN_DISP_UNIT, disp_unit,
173173
true);
174174
if (OMPI_SUCCESS != ret) return ret;
175175

176-
ret = ompi_attr_set_fortran_mpi2(WIN_ATTR, win,
176+
ret = ompi_attr_set_fortran_mpi1(WIN_ATTR, win,
177177
&win->w_keyhash,
178178
MPI_WIN_CREATE_FLAVOR, flavor, true);
179179
if (OMPI_SUCCESS != ret) return ret;
180180

181-
ret = ompi_attr_set_fortran_mpi2(WIN_ATTR, win,
181+
ret = ompi_attr_set_fortran_mpi1(WIN_ATTR, win,
182182
&win->w_keyhash,
183183
MPI_WIN_MODEL, model, true);
184184
if (OMPI_SUCCESS != ret) return ret;

0 commit comments

Comments
 (0)