diff --git a/src/tools/OFile.cpp b/src/tools/OFile.cpp
index 2f9c587cb6bcf2929dceb0ee6d35afba419e0059..ebd837a2173b74bc53608c0aa87cf76b0ef7d5df 100644
--- a/src/tools/OFile.cpp
+++ b/src/tools/OFile.cpp
@@ -55,6 +55,15 @@ size_t OFile::llwrite(const char*ptr,size_t s){
       r=fwrite(ptr,1,s,fp);
     }
   }
+//  This barrier is apparently useless since it comes
+//  just before a Bcast.
+//  
+//  Anyway, it looks like it is solving an issue that appeared on
+//  TRAVIS (at least on my laptop) so I add it here.
+//  GB
+  if(comm) comm->Barrier();
+
+
   if(comm) comm->Bcast(r,0);
   return r;
 }