foreach (test ${umpire_tests_passing} ${umpire_tests_deadlock} ${umpire_tests_problematic} )
add_executable(${test} ${test}.c)
target_link_libraries(${test} simgrid)
- set_source_files_properties(${test}.c PROPERTIES COMPILE_FLAGS "-Wno-error")
+ set_source_files_properties(${test}.c PROPERTIES COMPILE_FLAGS "-Wno-error -Wno-return-type")
set(umpire_tesh ${umpire_tesh} ${test})
set(files_to_clean ${files_to_clean} ${CMAKE_CURRENT_BINARY_DIR}/${test}.tesh)
endforeach(test)
MPI_Irecv (buf1, buf_size, MPI_INT,
MPI_ANY_SOURCE, 0, MPI_COMM_WORLD, &req);
- printf("Proc 0: Request number - %d\n",req);
+ printf("Proc 0: Request number - %p\n",req);
MPI_Send (buf0, buf_size, MPI_INT, 1, 0, MPI_COMM_WORLD);
MPI_Send (buf0, buf_size, MPI_INT, 1, 0, MPI_COMM_WORLD);
MPI_Wait (&req, &status);
- printf("Proc 0: Request number after wait test- %d\n",req);
+ printf("Proc 0: Request number after wait test- %p\n",req);
}
else if (rank == 1)
{
MPI_Irecv (buf1, buf_size, MPI_INT,
MPI_ANY_SOURCE, 0, MPI_COMM_WORLD, &req);
- printf("Proc 1: Request number - %d\n",req);
+ printf("Proc 1: Request number - %p\n",req);
MPI_Send (buf1, buf_size, MPI_INT, 0, 0, MPI_COMM_WORLD);
MPI_Send (buf1, buf_size, MPI_INT, 0, 0, MPI_COMM_WORLD);
MPI_Wait (&req, &status);
- printf("Proc 1: Request number after wait test- %d\n",req);
+ printf("Proc 1: Request number after wait test- %p\n",req);
}
MPI_Barrier (MPI_COMM_WORLD);
main (int argc, char **argv)
{
int rank;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int buf0[buf_size];
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int bbuf[(BUF_SIZE + MPI_BSEND_OVERHEAD) * 2 * NUM_BSEND_TYPES];
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int i, j, k, basic_extent;
int rank = -1;
int tag1 = 0;
int tag2 = 0;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int buf0[128];
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int sbuf[buf_size];
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int buf0[buf_size];
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int buf0[buf_size];
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
MPI_Comm inverted_comm;
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
MPI_Comm nc1;
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
MPI_Comm newcomm;
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
MPI_Comm newcomm;
MPI_Comm_size (newcomm, &nsize);
MPI_Comm_rank (newcomm, &nrank);
- printf ("world task %d/%d/%d maps to new comm task %d/%d/%d\n",
+ printf ("world task %p/%d/%d maps to new comm task %p/%d/%d\n",
comm, nprocs, rank, newcomm, nsize, nrank);
if (nrank == 0)
MPI_Bcast (&dat, 1, MPI_INT, 0, newcomm);
- printf ("world task %d/%d/%d maps to new comm task %d/%d/%d --> %d\n",
+ printf ("world task %p/%d/%d maps to new comm task %p/%d/%d --> %d\n",
comm, nprocs, rank, newcomm, nsize, nrank, dat);
}
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
MPI_Comm newcomm;
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
MPI_Comm newcomm;
MPI_Comm_size (newcomm, &nsize);
MPI_Comm_rank (newcomm, &nrank);
- printf ("world task %d/%d/%d maps to new comm task %d/%d/%d\n",
+ printf ("world task %p/%d/%d maps to new comm task %p/%d/%d\n",
comm, nprocs, rank, newcomm, nsize, nrank);
}
#define buf_size 32000
+int
main (int argc, char **argv)
{
int nprocs = -1;
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
int i;
char processor_name[128];
int namelen = 128;
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
int i;
char processor_name[128];
int namelen = 128;
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int i;
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int i;
hello.c -- simple hello world app
*/
-
+#include <stdio.h>
#ifndef lint
static char *rcsid = "$Header: /usr/gapps/asde/cvs-vault/umpire/tests/hello.c,v 1.2 2000/12/04 19:09:46 bronis Exp $";
#endif
#include "mpi.h"
+int
main (int argc, char **argv)
{
int nprocs = -1;
#define buf_size 128
-mydelay () /* about 6 seconds */
+int mydelay () /* about 6 seconds */
{
int i;
int val;
int rank = -1;
int tag1 = 31;
int tag2 = 32;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int buf0[buf_size];
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int buf[buf_size];
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int buf[BUF_SIZE * 2];
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int buf[BUF_SIZE * 2];
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int buf[BUF_SIZE * 2];
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int buf[BUF_SIZE * 2];
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int buf[BUF_SIZE * 2];
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int buf[buf_size];
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
int i;
char processor_name[128];
int namelen = 128;
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
int i;
char processor_name[128];
int namelen = 128;
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int bbuf[(BUF_SIZE + MPI_BSEND_OVERHEAD) * 2 * NUM_BSEND_TYPES];
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int buf[BUF_SIZE * 2 + SLOP];
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int buf[BUF_SIZE * 2 + SLOP];
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int buf[BUF_SIZE * 2 + SLOP];
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int buf[BUF_SIZE * 2 + SLOP];
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
- int i, basic_extent;
- int blocklens[3], displs[3];
+ int i;
+ MPI_Aint basic_extent;
+ int blocklens[3];
+ MPI_Aint displs[3];
MPI_Datatype structtypes[3];
MPI_Datatype newtype[2];
MPI_Request aReq[2];
MPI_Type_extent (newtype[0], &basic_extent);
if (basic_extent != sizeof (test_small_struct_t)) {
- fprintf (stderr, "(%d): Unexpected extent for small struct\n");
+ fprintf (stderr, "(%d): Unexpected extent for small struct\n", rank);
MPI_Abort (MPI_COMM_WORLD, 666);
}
MPI_Type_extent (newtype[1], &basic_extent);
if (basic_extent != sizeof (test_big_struct_t)) {
- fprintf (stderr, "(%d): Unexpected extent for big struct\n");
+ fprintf (stderr, "(%d): Unexpected extent for big struct\n", rank);
MPI_Abort (MPI_COMM_WORLD, 666);
}
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int bbuf[(BUF_SIZE + MPI_BSEND_OVERHEAD) * 2 * NUM_BSEND_TYPES];
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int i;
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
MPI_Datatype newtype;
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int i, j, k, basic_extent;
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int i;
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
MPI_Datatype newtype, newtype2;
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
int i;
{
int nprocs = -1;
int rank = -1;
- int comm = MPI_COMM_WORLD;
+ MPI_Comm comm = MPI_COMM_WORLD;
char processor_name[128];
int namelen = 128;
MPI_Datatype newtype;