From: degomme Date: Fri, 30 Mar 2018 11:08:21 +0000 (+0200) Subject: fix regexp. again. X-Git-Tag: v3.20~576 X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/commitdiff_plain/58f7ba549ebe9e54d1d9e0bb77660bccdba31d19 fix regexp. again. --- diff --git a/src/smpi/smpif90.in b/src/smpi/smpif90.in index bdf2925eb4..a269cd8952 100644 --- a/src/smpi/smpif90.in +++ b/src/smpi/smpif90.in @@ -34,7 +34,7 @@ trap 'cleanup' EXIT filter_and_compile() { list_add TMPFILES "${TMPFILE}" #replace "program main_name by subroutine user\_main (and the end clause as well)" - sed 's/[[:space:]]*[pP][rR][oO][gG][rR][aA][mM][[:space:]]+\([a-zA-Z0-9\-\_]*\)/ subroutine user\_main /g' "${ARG}" > "${TMPFILE}" + sed 's/[[:space:]]*[pP][rR][oO][gG][rR][aA][mM][[:space:]][[:space:]]*\([a-zA-Z0-9\-\_]*\)/ subroutine user\_main /g' "${ARG}" > "${TMPFILE}" SRCFILE="${TMPFILE}" list_add CMDLINE "${SRCFILE}" } diff --git a/src/smpi/smpiff.in b/src/smpi/smpiff.in index 3bc09c7c29..5fafa5153d 100644 --- a/src/smpi/smpiff.in +++ b/src/smpi/smpiff.in @@ -38,7 +38,7 @@ filter_and_compile_f77() { echo "#include \"@includedir@/smpi/smpi_extended_traces_fortran.h\"" > ${TMPFILE} echo "#line 1 \"${ARG}\"" >> ${TMPFILE} fi - sed 's/[[:space:]]\{6\}[[:space:]]*\([eE][nN][dD] \)\{0,1\}[pP][rR][oO][gG][rR][aA][mM][[:space:]]+\([a-zA-Z0-9\-\_]*\)/ \1subroutine user_main /g' "${ARG}" >> "${TMPFILE}" + sed 's/[[:space:]]\{6\}[[:space:]]*\([eE][nN][dD] \)\{0,1\}[pP][rR][oO][gG][rR][aA][mM][[:space:]][[:space:]]*\([a-zA-Z0-9\-\_]*\)/ \1subroutine user_main /g' "${ARG}" >> "${TMPFILE}" SRCFILE="${TMPFILE}" list_add CMDLINE "${SRCFILE}" } @@ -49,7 +49,7 @@ filter_and_compile_f90() { echo "#include \"@includedir@/smpi/smpi_extended_traces_fortran.h\"" > ${TMPFILE} echo "#line 1 \"${ARG}\"" >> ${TMPFILE} fi - sed 's/[[:space:]]*[pP][rR][oO][gG][rR][aA][mM][[:space:]]*\([a-zA-Z0-9\-\_]*\)/ subroutine user\_main /g;s/[[:space:]]*[uU][sS][eE][[:space:]]*[mM][pP][iI]/\include \"mpif\.h\" /g' "${ARG}" > "${TMPFILE}" + sed 's/[[:space:]]*[pP][rR][oO][gG][rR][aA][mM][[:space:]][[:space:]]*\([a-zA-Z0-9\-\_]*\)/ subroutine user\_main /g' "${ARG}" > "${TMPFILE}" SRCFILE="${TMPFILE}" list_add CMDLINE "${SRCFILE}" }