Remove unnecessary "mpi.h"; move opal headers to the top.
This commit was SVN r30053.
Этот коммит содержится в:
родитель
24879f9def
Коммит
71ec6c1617
@ -11,6 +11,7 @@
|
||||
* All rights reserved.
|
||||
* Copyright (c) 2012 Oak Rigde National Laboratory.
|
||||
* All rights reserved.
|
||||
* Copyright (c) 2013 Cisco Systems, Inc. All rights reserved.
|
||||
* $COPYRIGHT$
|
||||
*
|
||||
* Additional copyrights may follow
|
||||
@ -24,10 +25,10 @@
|
||||
#include <string.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
#include "mpi.h"
|
||||
#include "ompi/communicator/communicator.h"
|
||||
#include "opal/mca/mca.h"
|
||||
#include "opal/mca/base/base.h"
|
||||
|
||||
#include "ompi/communicator/communicator.h"
|
||||
#include "ompi/mca/coll/base/base.h"
|
||||
|
||||
#define CLOSE(comm, func) \
|
||||
@ -77,7 +78,6 @@ int mca_coll_base_comm_unselect(ompi_communicator_t * comm)
|
||||
CLOSE(comm, iscatter);
|
||||
CLOSE(comm, iscatterv);
|
||||
|
||||
|
||||
/* All done */
|
||||
return OMPI_SUCCESS;
|
||||
}
|
||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user