X-Git-Url: http://bilbo.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/bddef652e63e14c3a90e0fabba76b539a7bde101..ff0f62184e9c28944faeb139b086ba16708608ad:/src/smpi/smpif90.in diff --git a/src/smpi/smpif90.in b/src/smpi/smpif90.in index c0cb3482b9..64748ca418 100644 --- a/src/smpi/smpif90.in +++ b/src/smpi/smpif90.in @@ -9,8 +9,7 @@ FFLAGS="-ff2c -fno-second-underscore" LINKARGS="-lsimgrid -lm -lgfortran" main_name=main -declare -a TMPFILES -trap 'rm -f "${TMPFILES[@]}"' EXIT +trap 'rm -f ${TMPFILES}' EXIT # $1: prefix, $2: suffix mymktemp () { @@ -41,7 +40,7 @@ while [ -n "$1" ]; do ;; *.f90|*.F90) TMPFILE=$(mymktemp "${ARG}" ".f90") - TMPFILES+="${TMPFILE}" + TMPFILES="${TMPFILES} ${TMPFILE}" #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}"