X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/cdcaca9fe8cd4af53e699047cea7df2d40c9e8a8..3380ca3d792a37cdccf63681c0db8d30b346b812:/src/smpi/smpif90.in

diff --git a/src/smpi/smpif90.in b/src/smpi/smpif90.in
index bb772b5364..dadde6e732 100644
--- a/src/smpi/smpif90.in
+++ b/src/smpi/smpif90.in
@@ -24,7 +24,8 @@ while [ -n "$1" ]; do
       if [ -z $SRCFILE ] ; then
          SRCFILE="$ARG"
       fi
-      TMPFILE=$ARG\_.f90
+
+      TMPFILE=${ARG}\_$RANDOM.f90
       #replace "program main_name by subroutine user\_main (and the end clause as well)"
       sed 's/[[:space:]]*program[[:space:]]*\([a-zA-Z0-9\-\_]*\)/subroutine user\_main /gI;s/[[:space:]]*use[[:space:]]*mpi/\include \"mpif\.h\" /gI'  ${ARG} > ${TMPFILE}
       SRCFILE="${TMPFILE}"