A
lgorithmique
N
umérique
D
istribuée
Public GIT Repository
projects
/
simgrid.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
fix build without tracing
[simgrid.git]
/
src
/
smpi
/
smpif90.in
diff --git
a/src/smpi/smpif90.in
b/src/smpi/smpif90.in
index
2d76ad2
..
dadde6e
100644
(file)
--- a/
src/smpi/smpif90.in
+++ b/
src/smpi/smpif90.in
@@
-1,12
+1,12
@@
#! /bin/bash
#! /bin/bash
-CC=
@CMAKE_Fortran_Compiler@
+CC=
gfortran
INCLUDEARGS="@includeflag@"
CMAKE_LINKARGS="-L@libdir@"
INCLUDEARGS="@includeflag@"
CMAKE_LINKARGS="-L@libdir@"
-FFLAGS="-ff2c "
-LINKARGS="-lsimgrid -l
smpi -l
m -lgfortran"
+FFLAGS="-ff2c
-fno-second-underscore
"
+LINKARGS="-lsimgrid -lm -lgfortran"
main_name=main
TMPFILE=$(mktemp).f90
CMDLINE=""
main_name=main
TMPFILE=$(mktemp).f90
CMDLINE=""
@@
-24,8
+24,10
@@
while [ -n "$1" ]; do
if [ -z $SRCFILE ] ; then
SRCFILE="$ARG"
fi
if [ -z $SRCFILE ] ; then
SRCFILE="$ARG"
fi
+
+ TMPFILE=${ARG}\_$RANDOM.f90
#replace "program main_name by subroutine user\_main (and the end clause as well)"
#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' ${ARG} > ${TMPFILE}
+ 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}"
CMDLINE="${CMDLINE} ${SRCFILE} "
;;
SRCFILE="${TMPFILE}"
CMDLINE="${CMDLINE} ${SRCFILE} "
;;
@@
-37,7
+39,7
@@
done
CMDLINE="${CC} ${FFLAGS} ${CMDLINE} ${INCLUDEARGS} ${CMAKE_LINKARGS} ${LINKARGS}"
CMDLINE="${CC} ${FFLAGS} ${CMDLINE} ${INCLUDEARGS} ${CMAKE_LINKARGS} ${LINKARGS}"
-echo "${CMDLINE}"
+
#
echo "${CMDLINE}"
${CMDLINE}
if [ -f ${TMPFILE} ];then
${CMDLINE}
if [ -f ${TMPFILE} ];then