← Back to branch summary

~chaffra/+junk/trilinos

« back to all changes in this revision

Viewing changes to packages/zoltan/siMPI/pyMPI/siMPI/tests/testSendrecv2.1.c

  • Committer: Bazaar Package Importer
  • Author(s): Christophe Prud'homme, Christophe Prud'homme, Johannes Ring
  • Date: 2009-12-13 12:53:22 UTC
  • mfrom: (5.1.2 sid)
  • Revision ID: james.westby@ubuntu.com-20091213125322-in0nrdjc55deqsw9
Tags: 10.0.3.dfsg-1
[Christophe Prud'homme]
* New upstream release

[Johannes Ring]
* debian/patches/libname.patch: Add prefix 'libtrilinos_' to all
  libraries. 
* debian/patches/soname.patch: Add soversion to libraries.
* debian/watch: Update download URL.
* debian/control:
  - Remove python-numeric from Build-Depends (virtual package).
  - Remove automake and autotools from Build-Depends and add cmake to
    reflect switch to CMake.
  - Add python-support to Build-Depends.
* debian/rules: 
  - Cleanup and updates for switch to CMake.

Show diffs side-by-side

added added

removed removed

Lines of Context:
packages/zoltan/siMPI/pyMPI/siMPI/tests/testSendrecv2.1.c
 
1
 
 
2
/*TEST
 
3
SKIP=1
 
4
PATH='tests/testSendrecv2.1.c'
 
5
CCFLAGS=""
 
6
INPUT=""
 
7
OUTPUT=''
 
8
STATUS=0
 
9
TEST*/
 
10
 
 
11
/******************************************************************/
 
12
/* FILE  ***********      testSendrecv2.c      ********************/
 
13
/******************************************************************/
 
14
/* Author : Lisa Alano July 29 2002                               */
 
15
/* Copyright (c) 2002 University of California Regents            */
 
16
/******************************************************************/
 
17
/******************************************************************/
 
18
 
 
19
#if 0
 
20
CCFLAGS = None 
 
21
ARGS = None
 
22
INPUT = EOF 
 
23
OUTPUT = ERROR: -5001 MPI_SEND argument error
 
24
  ERROR: -5001 MPI aborting... 
 
25
STATUS = 0 
 
26
#endif
 
27
 
 
28
#include <stdio.h>
 
29
#include <string.h>
 
30
#include "mpi.h"
 
31
 
 
32
int main(int argc, char**argv) 
 
33
{
 
34
  int my_rank;
 
35
  int p;
 
36
  char message1[50];
 
37
  char message2[50];
 
38
  int source, dest, tag; 
 
39
  MPI_Status status;
 
40
 
 
41
  MPI_Init(&argc, &argv);
 
42
  MPI_Comm_rank(MPI_COMM_WORLD, &my_rank);
 
43
  MPI_Comm_size(MPI_COMM_WORLD, &p);
 
44
 
 
45
  source = tag = dest = 0;
 
46
  sprintf(message1, "Hello there");
 
47
  MPI_Sendrecv(NULL, strlen(message1)+1, MPI_CHAR, dest, tag, message2, 50, MPI_CHAR, source, tag, MPI_COMM_WORLD, &status);
 
48
  
 
49
  printf("%s\n", message2);
 
50
 
 
51
  MPI_Finalize();
 
52
  return 0;
 
53
}