- fix for serial build

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@4155 c92efa57-630b-4861-b058-cf58834340f0
2007-08-18 15:56:13 +00:00 · 2007-08-18 15:56:13 +00:00 · 8f0db9caab
parent 790329ccd0
commit 8f0db9caab
1 changed files with 4 additions and 0 deletions
--- a/Modules/mp.f90
+++ b/Modules/mp.f90
@ -1621,6 +1621,10 @@
        mp_call_count( 36 ) = mp_call_count( 36 ) + 1
        mp_call_sizex( 36 ) = MAX( mp_call_sizex( 36 ), msglen )

+#else
+
+        res = msg
+
 #endif

      END SUBROUTINE mp_root_sum_rm