Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
generate unique names, but easier for debug
authorAugustin Degomme <degomme@idpann.imag.fr>
Wed, 24 Jul 2013 11:19:45 +0000 (13:19 +0200)
committerAugustin Degomme <degomme@idpann.imag.fr>
Wed, 24 Jul 2013 11:19:45 +0000 (13:19 +0200)
src/smpi/smpif90.in
src/smpi/smpiff.in

index bb772b5..dadde6e 100644 (file)
@@ -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}"
index 7fd89c8..301802c 100644 (file)
@@ -30,10 +30,10 @@ if [ -n "${SRCFILES}" ]
 then
    for SRCFILE in "${SRCFILES}"
    do
-      TMPFILE=$(mktemp -p .).f
+      TMPFILE=${SRCFILE}\_$RANDOM.f
       cp ${SRCFILE} ${TMPFILE}
       CFILE="${TMPFILE%.f}.c"
-      #echo "$prefix/bin/smpif2c ${SRCFILE} && $prefix/bin/smpicc ${ARGS} ${CFILE} && rm ${CFILE}"
+      #echo "$prefix/bin/smpif2c ${TMPFILE} && $prefix/bin/smpicc ${ARGS} ${CFILE} && rm ${CFILE} && rm ${TMPFILE}"
       $prefix/bin/smpif2c ${TMPFILE} && $prefix/bin/smpicc ${ARGS} ${CFILE} && rm ${CFILE} && rm ${TMPFILE}
    done
 else