Changeset 634 for trunk/LMDZ.GENERIC/create_make_gcm

Timestamp:

Apr 26, 2012, 10:03:22 AM (13 years ago)

Author:

emillour

Message:

All GCMs:

• Improved 'create_make_gcm' scripts: better control of wether files are identified as main programs or routines.

EM

File:

• trunk/LMDZ.GENERIC/create_make_gcm (modified) (3 diffs)

trunk/LMDZ.GENERIC/create_make_gcm

@@ -153 +153 @@
       do
          fili=`basename $i .F`
-         test=` (  head $i | grep '      PROGRAM' ) `
+         # Check if file is a routine or main program
+         # i.e: look for the "program" keword preceeded by leading spaces
+         test=` (  head $i | grep -i '^ *program' ) `
          if [ "$test" = "" ] ; then 
+            # if it is not a main program, add it to the list
             listlib=$listlib" "$fili
          fi
@@ -161 +164 @@
       do
          fili=`basename $i .F90`
-         test=` (  head $i | grep '      PROGRAM' ) `
+         # Check if file is a routine or main program
+         # i.e. look for "program" keyword (with possibly some leading spaces)
+         test=` (  head $i | grep -i '^ \{0,\}program' ) `
          if [ "$test" = "" ] ; then
+            # if it is not a main program, add it to the list
             listlib=$listlib" "$fili
          fi 
@@ -238 +244 @@
               echo '    $(COMPILE90) $(LIBF)/'$diri'/'$trufile' ; \'
            fi
+           ## If a module, handle created module descriptor file
            MODU=0; egrep -i '^ *module ' $trufile> /dev/null 2>&1 && MODU=1
             if [ "$MODU" -eq '1' -a "$CRAY" != '1' ] ; then