Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Have fortran SMPI compilers output in current folder, not in source one
authordegomme <augustin.degomme@unibas.ch>
Thu, 22 Mar 2018 12:50:10 +0000 (13:50 +0100)
committerdegomme <augustin.degomme@unibas.ch>
Thu, 22 Mar 2018 12:51:36 +0000 (13:51 +0100)
src/smpi/smpif90.in
src/smpi/smpiff.in

index 7097dc3..98459db 100644 (file)
@@ -48,13 +48,15 @@ while [ $# -gt 0 ]; do
             list_add CMDLINE "-c"
             ;;
         *.f90)
-            ORIGFILE="${ARG%.f90}"
+            FILENAME=`basename ${ARG}`
             TMPFILE=$(mymktemp "${ARG}" ".f90")
+            ORIGFILE="${FILENAME%.f90}"
             filter_and_compile
             ;;
         *.F90)
-            ORIGFILE="${ARG%.F90}"
+            FILENAME=`basename ${ARG}`
             TMPFILE=$(mymktemp "${ARG}" ".F90")
+            ORIGFILE="${FILENAME%.F90}"
             filter_and_compile
             ;;
         '-version' | '--version')
index 42120a7..0ab2d28 100644 (file)
@@ -53,13 +53,15 @@ while [ $# -gt 0 ]; do
             list_add CMDLINE "-c"
             ;;
         *.f)
+            FILENAME=`basename ${ARG}`
             TMPFILE=$(mymktemp "${ARG}" ".f")
-            ORIGFILE="${ARG%.f}"
+            ORIGFILE="${FILENAME%.f}"
             filter_and_compile
             ;;
-        *.F)
+        *.F)$
+            FILENAME=`basename ${ARG}`
             TMPFILE=$(mymktemp "${ARG}" ".F")
-            ORIGFILE="${ARG%.F}"
+            ORIGFILE="${FILENAME%.F}"
             filter_and_compile
             ;;
         '-version' | '--version')