Changeset 6039 for LMDZ6/trunk/create_make_gcm

Timestamp:

Jan 21, 2026, 1:57:42 AM (4 days ago)

Author:

fhourdin

Message:

makelmdz (without fcm) refresh

File:

• LMDZ6/trunk/create_make_gcm (modified) (1 diff)

LMDZ6/trunk/create_make_gcm

@@ -181 +181 @@
       for trufile in $listlib ; do
          fili=`echo $trufile | awk -F/ ' { print $NF } ' | cut -d. -f1`
-         F90=0 ; egrep -i '^ *use ' $trufile > /dev/null 2>&1 && F90=1
-                 egrep -i '^ *module ' $trufile > /dev/null 2>&1 && F90=1
-                 egrep -i '#include*.inc ' $trufile > /dev/null 2>&1 && F90=1
+         # egrep -i '^[^!]*use ' cherche toutes les lignes avec un use sans ! avant
+         F90=0 ; egrep -i '^[^!]*use ' $trufile > /dev/null 2>&1 && F90=1
+                 egrep -i '^[^!]*module ' $trufile > /dev/null 2>&1 && F90=1
+                 egrep -i '^[^!]*#include*.inc ' $trufile > /dev/null 2>&1 && F90=1
          str1='$(LIBO)/lib'$topdiri'.a('$fili'.o) : $(LIBF)/'$trufile
          [ "$fili" = "$diri/chem.subs" ] && str1=$str1' $(LIBF)/'$diri/chem.mods.F