From 947cd8e256c5fb21ed3bf8567249490ad685d99f Mon Sep 17 00:00:00 2001
From: David Kaufmann <astra@ionic.at>
Date: Thu, 26 Jan 2012 22:47:56 +0100
Subject: [PATCH] fix bug in scan.c

---
 openmp/scan/scan.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/openmp/scan/scan.c b/openmp/scan/scan.c
index ec1029e..ea3dd47 100644
--- a/openmp/scan/scan.c
+++ b/openmp/scan/scan.c
@@ -27,10 +27,10 @@ int main(int argc, char *argv[])
   if (rank==0) {
     printf("Rank %d initializing, total %d\n",rank,size);
   } else {
-    MPI_Recv(&prev,1,MPI_INT,rank-1,HELLO,MPI_COMM_WORLD,MPI_STATUS_IGNORE);
+    MPI_Recv(&prev,1,MPI_INT,rank-1,KEY,MPI_COMM_WORLD,MPI_STATUS_IGNORE);
     printf("Rank %d on %s received from %d, passing on\n",rank,name,prev);
   }
-  if (rank+1<size) MPI_Send(&rank,1,MPI_INT,rank+1,HELLO,MPI_COMM_WORLD);
+  if (rank+1<size) MPI_Send(&rank,1,MPI_INT,rank+1,KEY,MPI_COMM_WORLD);
       
   MPI_Finalize();
   return 0;
-- 
2.43.0