bd8b4f7f1e
Roll in the ORTE state machine. Remove last traces of opal_sos. Remove UTK epoch code. Please see the various emails about the state machine change for details. I'll send something out later with more info on the new arch. This commit was SVN r26242.
33 строки
701 B
C
33 строки
701 B
C
/* -*- C -*-
|
|
*
|
|
* $HEADER$
|
|
*
|
|
* The most basic of MPI applications
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
#include "opal/mca/hwloc/hwloc.h"
|
|
#include "mpi.h"
|
|
|
|
|
|
int main(int argc, char* argv[])
|
|
{
|
|
int rank, size, rc;
|
|
hwloc_cpuset_t cpus;
|
|
char *bindings;
|
|
|
|
MPI_Init(&argc, &argv);
|
|
MPI_Comm_rank(MPI_COMM_WORLD, &rank);
|
|
MPI_Comm_size(MPI_COMM_WORLD, &size);
|
|
|
|
cpus = hwloc_bitmap_alloc();
|
|
rc = hwloc_get_cpubind(opal_hwloc_topology, cpus, HWLOC_CPUBIND_PROCESS);
|
|
hwloc_bitmap_list_asprintf(&bindings, cpus);
|
|
|
|
printf("Hello, World, I am %d of %d: get_cpubind: %d bitmap %s\n", rank, size, rc,
|
|
(NULL == bindings) ? "NULL" : bindings);
|
|
|
|
MPI_Finalize();
|
|
return 0;
|
|
}
|