From 70292000c358a72285c8598437de40b543548013 Mon Sep 17 00:00:00 2001
From: Joachim Schoeberl <joachim.schoeberl@tuwien.ac.at>
Date: Wed, 13 Jul 2011 18:27:17 +0000
Subject: [PATCH] interface

---
 libsrc/general/mpi_interface.hpp | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/libsrc/general/mpi_interface.hpp b/libsrc/general/mpi_interface.hpp
index a896338f..09911ff6 100644
--- a/libsrc/general/mpi_interface.hpp
+++ b/libsrc/general/mpi_interface.hpp
@@ -234,10 +234,11 @@ namespace netgen
 
 
 
-  inline void MyMPI_Send (  int *& s, int & len,  int dest, int tag)
+  inline void MyMPI_Send (  int *& s, int len,  int dest, int tag)
   {
-     MPI_Send( &len, 1, MPI_INT, dest, tag, MPI_COMM_WORLD);
-     MPI_Send( s, len, MPI_INT, dest, tag, MPI_COMM_WORLD);
+    int hlen = len;
+    MPI_Send( &hen, 1, MPI_INT, dest, tag, MPI_COMM_WORLD);
+    MPI_Send( s, len, MPI_INT, dest, tag, MPI_COMM_WORLD);
   }