1
1

Merge pull request #1883 from karasevb/fix_mca_spml_call

oshmem/fortran: fix warning mesages
Этот коммит содержится в:
Artem Polyakov 2016-07-22 16:59:11 +06:00 коммит произвёл GitHub
родитель bbc6d4b3d4 49b67094e0
Коммит 9807a6d585

Просмотреть файл

@ -1,7 +1,6 @@
/* /*
* Copyright (c) 2013 Mellanox Technologies, Inc. * Copyright (c) 2013-2016 Mellanox Technologies, Inc. All rights reserved.
* All rights reserved. * Copyright (c) 2013 Cisco Systems, Inc. All rights reserved.
* Copyright (c) 2013 Cisco Systems, Inc. All rights reserved.
* $COPYRIGHT$ * $COPYRIGHT$
* *
* Additional copyrights may follow * Additional copyrights may follow
@ -34,8 +33,8 @@ SHMEM_GENERATE_FORTRAN_BINDINGS_SUB (void,
void shmem_put_f(FORTRAN_POINTER_T target, FORTRAN_POINTER_T source, MPI_Fint *length, MPI_Fint *pe) void shmem_put_f(FORTRAN_POINTER_T target, FORTRAN_POINTER_T source, MPI_Fint *length, MPI_Fint *pe)
{ {
MCA_SPML_CALL(put(FPTR_2_VOID_PTR(target), MCA_SPML_CALL(put(FPTR_2_VOID_PTR(target),
OMPI_FINT_2_INT(*length) * 8,
FPTR_2_VOID_PTR(source), FPTR_2_VOID_PTR(source),
OMPI_FINT_2_INT(*length),
OMPI_FINT_2_INT(*pe))); OMPI_FINT_2_INT(*pe)));
} }