/[MITgcm]/MITgcm/tools/genmake2
ViewVC logotype

Diff of /MITgcm/tools/genmake2

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.174 by cnh, Thu Nov 6 03:55:50 2008 UTC revision 1.183 by utke, Wed Jan 14 20:08:40 2009 UTC
# Line 1046  INCLUDES="-I. $INCLUDES" Line 1046  INCLUDES="-I. $INCLUDES"
1046  FFLAGS=  FFLAGS=
1047  FOPTIM=  FOPTIM=
1048  FEXTRAFLAGS=  FEXTRAFLAGS=
1049    USE_EXTENDED_SRC=
1050    EXTENDED_SRC_FLAG=
1051  CFLAGS=  CFLAGS=
1052  KFLAGS1=  KFLAGS1=
1053  KFLAGS2=  KFLAGS2=
# Line 1402  if test ! -d ${ROOTDIR} ; then Line 1404  if test ! -d ${ROOTDIR} ; then
1404  fi  fi
1405    
1406  #  Find the MITgcm ${THISVER}  #  Find the MITgcm ${THISVER}
1407  if test -f "${ROOTDIR}/doc/tag-index" ; then  version_file="${ROOTDIR}/doc/tag-index"
1408      THISVER=`grep '^checkpoint' ${ROOTDIR}/doc/tag-index | head -1`  if test -f $version_file ; then
1409        THISVER=`grep '^checkpoint' $version_file | head -1`
1410    #-  remove ./BUILD_INFO.h file if older than version_file
1411        if test -f ./BUILD_INFO.h -a ./BUILD_INFO.h -ot $version_file ; then
1412            echo "  remove ./BUILD_INFO.h (older than ${version_file})"
1413            rm -f ./BUILD_INFO.h
1414        fi
1415  fi  fi
1416    
1417  if test "x$MAKEFILE" = x ; then  if test "x$MAKEFILE" = x ; then
# Line 1640  if test ! "x$GSL" = x ; then Line 1648  if test ! "x$GSL" = x ; then
1648        INCLUDES="$INCLUDES $GSLINC"        INCLUDES="$INCLUDES $GSLINC"
1649        LIBS="$LIBS $GSLLIB"        LIBS="$LIBS $GSLLIB"
1650  fi  fi
1651    #- if USE_EXTENDED_SRC is set, add EXTENDED_SRC_FLAG to FFLAGS :
1652    if test ! "x$USE_EXTENDED_SRC" = x ; then
1653          FFLAGS="$FFLAGS $EXTENDED_SRC_FLAG"
1654          F90FIXEDFORMAT="$F90FIXEDFORMAT $EXTENDED_SRC_FLAG"
1655    fi
1656    
1657  printf "\n===  Checking system libraries  ===\n"  printf "\n===  Checking system libraries  ===\n"
1658  printf "  Do we have the system() command using $FC...  "  printf "  Do we have the system() command using $FC...  "
# Line 2616  clean: Line 2629  clean:
2629          -rm -rf *.o          -rm -rf *.o
2630          -rm -rf *.$FS *.flowdir          -rm -rf *.$FS *.flowdir
2631          -rm -rf *.f$FS90 *_mod.h *_mod.F90 *.FF90 *.mod-whirl ad_input*          -rm -rf *.f$FS90 *_mod.h *_mod.F90 *.FF90 *.mod-whirl ad_input*
2632          -rm -rf temp.sed reslice.dat          -rm -rf temp.sed
2633  Clean:  Clean:
2634          @make clean          @make clean
2635          @make cleanlinks          @make cleanlinks
# Line 2682  cat >>$MAKEFILE <<EOF Line 2695  cat >>$MAKEFILE <<EOF
2695  # The normal chain of rules is (  .F - .$FS - .o  )  # The normal chain of rules is (  .F - .$FS - .o  )
2696    
2697  ## This nullifies any default implicit rules concerning these two file types:  ## This nullifies any default implicit rules concerning these two file types:
2698  %.o : %.F  ## %.o : %.F
2699    
2700  .F.$FS:  .F.$FS:
2701          \$(CPP) \$(DEFINES) \$(INCLUDES) > \$@          \$(CPP) \$(DEFINES) \$(INCLUDES) > \$@
# Line 2740  done Line 2753  done
2753  echo "  Add the source list for AD code generation"  echo "  Add the source list for AD code generation"
2754  echo >> $MAKEFILE  echo >> $MAKEFILE
2755  printf "AD_FILES = " >> $MAKEFILE  printf "AD_FILES = " >> $MAKEFILE
2756  AD_FILES=`cat ad_files`  AD_FILES=`cat adSrcFiles.tmp`
2757  for i in $AD_FILES ; do  for i in $AD_FILES ; do
2758      echo    " \\" >> $MAKEFILE      echo    " \\" >> $MAKEFILE
2759      printf " $i" >> $MAKEFILE      printf " $i" >> $MAKEFILE
2760  done  done
2761  echo >> $MAKEFILE  echo >> $MAKEFILE
2762  rm -f ad_files  rm -f adSrcFiles.tmp
2763    
2764  cat >>$MAKEFILE <<EOF  cat >>$MAKEFILE <<EOF
2765    
# Line 2938  timeRatio.c Line 2951  timeRatio.c
2951  f95_test_mods.f90: \$(OPENAD_SUPPORT_F90_SRC_FILES:F90=$FS90)  f95_test_mods.f90: \$(OPENAD_SUPPORT_F90_SRC_FILES:F90=$FS90)
2952          cat \$^ > \$@          cat \$^ > \$@
2953    
2954  f95_test.f90: all_mods.xb.x2w.w2f.pp.f$FS90 \$(NON_AD_F77_SRC_FILES:.F=_cb2m.f$FS90) ad_input_code.w2f.canon.xb.x2w.w2f.rs.pp.f$FS90  f95_test.f90: all_mods.xb.x2w.w2f.pp.f$FS90 \$(NON_AD_F77_SRC_FILES:.F=_cb2m.f$FS90) ad_input_code.w2f.pre.xb.x2w.w2f.td.pp.f$FS90
2955          cat \$^ > \$@          cat \$^ > \$@
2956    
2957  f95_test.out: f95_test_mods.f90 f95_test.f90  f95_test.out: f95_test_mods.f90 f95_test.f90
2958          f95 -fixed -w=unused -maxcontin=132 -c f95_test_mods.f90 > \$@ 2>&1          f95 -fixed -w=unused -maxcontin=132 -c f95_test_mods.f90 > \$@ 2>&1
2959          f95 -fixed -w=unused -maxcontin=132 -c -fixed f95_test.f90 >> \$@ 2>&1          f95 -fixed -w=unused -maxcontin=132 -c -fixed f95_test.f90 >> \$@ 2>&1
2960    
2961  AD_OBJ_FILES=\$(OPENAD_SUPPORT_F90_SRC_FILES:.F90=.o) \$(OPENAD_SUPPORT_C_SRC_FILES:.c=.o) all_mods.xb.x2w.w2f.pp.o  ad_input_code.w2f.canon.xb.x2w.w2f.rs.pp.o \$(NON_AD_F77_SRC_FILES:.F=_cb2m.o) \$(C_SRC_FILES:.c=.o) \$(F90_SRC_FILES:.F90=.o)  AD_OBJ_FILES=\$(OPENAD_SUPPORT_F90_SRC_FILES:.F90=.o) \$(OPENAD_SUPPORT_C_SRC_FILES:.c=.o) all_mods.xb.x2w.w2f.pp.o  ad_input_code.w2f.pre.xb.x2w.w2f.td.pp.o \$(NON_AD_F77_SRC_FILES:.F=_cb2m.o) \$(C_SRC_FILES:.c=.o) \$(F90_SRC_FILES:.F90=.o)
2962    
2963  \$(EXE_AD): \$(ALL_LINKED_FILES) \$(addsuffix _mod.h, \$(CB2M_F90_SRC_NAMES)) \$(AD_OBJ_FILES)  \$(EXE_AD): \$(ALL_LINKED_FILES) \$(addsuffix _mod.h, \$(CB2M_F90_SRC_NAMES)) \$(AD_OBJ_FILES)
2964          @echo Creating \$@ ...          @echo Creating \$@ ...
2965          \$(LINK) -o \$@ \$(FFLAGS) \$(FOPTIM) \$(AD_OBJ_FILES) \$(LIBS)          \$(LINK) -o \$@ \$(FFLAGS) \$(FOPTIM) \$(AD_OBJ_FILES) \$(LIBS)
2966    
2967  # makefile debug rule  # makefile debug rule
2968  openad: ad_input_code.w2f.canon.xb.x2w.w2f.rs.pp.f$FS90  openad: ad_input_code.w2f.pre.xb.x2w.w2f.td.pp.f$FS90
2969  .PHONY: openad  .PHONY: openad
2970    
2971  # create the module files  # create the module files
# Line 2998  ad_input_code_sf.w2f.f$FS90: ad_input_co Line 3011  ad_input_code_sf.w2f.f$FS90: ad_input_co
3011          cat w2f__types.f90 \$(basename \$<).w2f.f > \$@          cat w2f__types.f90 \$(basename \$<).w2f.f > \$@
3012    
3013  # canonicalizer  # canonicalizer
3014  ad_input_code_sf.w2f.canon.f$FS90: ad_input_code_sf.w2f.f$FS90 canon.v1.py  ad_input_code_sf.w2f.pre.f$FS90: ad_input_code_sf.w2f.f$FS90 preProcess.py
3015          python canon.v1.py --r8 \$< > \$@          ./preProcess.py -H -S \$< -o \$@
3016    
3017  # F -> WHIRL  # F -> WHIRL
3018  # note that the canonicalized version cuts off at col 72  # note that the canonicalized version cuts off at col 72
# Line 3007  ad_input_code_sf.w2f.canon.f$FS90: ad_in Line 3020  ad_input_code_sf.w2f.canon.f$FS90: ad_in
3020  # as we are in fixed mode and cut of exactly there.  # as we are in fixed mode and cut of exactly there.
3021  # Otherwise mfef90 patches in spaces to fill up to 72 (or 132)  # Otherwise mfef90 patches in spaces to fill up to 72 (or 132)
3022  # characters respectively.  # characters respectively.
3023  ad_input_code_sf.w2f.canon.B: ad_input_code_sf.w2f.canon.f$FS90 mfef90  ad_input_code_sf.w2f.pre.B: ad_input_code_sf.w2f.pre.f$FS90 mfef90
3024          ./mfef90 -r8 -z -F \$<          ./mfef90 -r8 -z -F \$<
3025          mv \$<.B \$@          mv \$<.B \$@
3026    
3027  # WHIRL -> XAIF  # WHIRL -> XAIF
3028  ad_input_code_sf.w2f.canon.xaif : ad_input_code_sf.w2f.canon.B whirl2xaif  ad_input_code_sf.w2f.pre.xaif : ad_input_code_sf.w2f.pre.B whirl2xaif
3029          ./whirl2xaif -s -n --debug 1 -o \$@ \$<          ./whirl2xaif -s -n --debug 1 -o \$@ \$<
3030    
3031  # XAIF -> XAIF'  # XAIF -> XAIF'
3032  ad_input_code_sf.w2f.canon.xb.xaif : ad_input_code_sf.w2f.canon.xaif xaif.xsd xaif_base.xsd xaif_inlinable_intrinsics.xsd xaif_derivative_propagator.xsd xaif_output.xsd openad_adm  ad_input_code_sf.w2f.pre.xb.xaif : ad_input_code_sf.w2f.pre.xaif xaif.xsd xaif_base.xsd xaif_inlinable_intrinsics.xsd xaif_derivative_propagator.xsd xaif_output.xsd oadDriver
3033          ./openad_adm -f -t forward_step -i \$< -c \${XAIFSCHEMAROOT}/schema/examples/inlinable_intrinsics.xaif -o \$@ -I -r          ./oadDriver -f -t forward_step -i \$< -c \${XAIFSCHEMAROOT}/schema/examples/inlinable_intrinsics.xaif -o \$@ -I -r
3034    
3035  # XAIF' -> WHIRL'  # XAIF' -> WHIRL'
3036  ad_input_code_sf.w2f.canon.xb.x2w.B : ad_input_code_sf.w2f.canon.xb.xaif xaif2whirl  ad_input_code_sf.w2f.pre.xb.x2w.B : ad_input_code_sf.w2f.pre.xb.xaif xaif2whirl
3037          ./xaif2whirl --debug 1 --structured ad_input_code_sf.w2f.canon.B \$<          ./xaif2whirl --debug 1 --structured ad_input_code_sf.w2f.pre.B \$<
3038    
3039  # WHIRL' -> F'  # WHIRL' -> F'
3040  ad_input_code_sf.w2f.canon.xb.x2w.w2f.f$FS90: ad_input_code_sf.w2f.canon.xb.x2w.B whirl2f whirl2f_be  ad_input_code_sf.w2f.pre.xb.x2w.w2f.f$FS90: ad_input_code_sf.w2f.pre.xb.x2w.B whirl2f whirl2f_be
3041          ./whirl2f -FLIST:ftn_file=\$@ -openad \$<          ./whirl2f -FLIST:ftn_file=\$@ -openad \$<
3042    
 # undo slice hiding  
3043  # insert template directives  # insert template directives
3044  ad_input_code_sf.w2f.canon.xb.x2w.w2f.rs.f$FS90: ad_input_code_sf.w2f.canon.xb.x2w.w2f.f$FS90 reslicer.py ../OAD_support/insertTemplateDir.bash  ad_input_code_sf.w2f.pre.xb.x2w.w2f.td.f$FS90: ad_input_code_sf.w2f.pre.xb.x2w.w2f.f$FS90 ../OAD_support/insertTemplateDir.bash
3045          python reslicer.py \$< > \$<.1          ../OAD_support/insertTemplateDir.bash \$< \$@
         ../OAD_support/insertTemplateDir.bash \$<.1  \$@  
         rm \$<.1  
3046    
3047  # postprocess F'  # postprocess F'
3048  ad_input_code_sf.w2f.canon.xb.x2w.w2f.rs.pp.f$FS90: ad_input_code_sf.w2f.canon.xb.x2w.w2f.rs.f$FS90 multi-pp.pl ../OAD_support/ad_inline.f \$(wildcard ../OAD_support/ad_template.*.f)  ad_input_code_sf.w2f.pre.xb.x2w.w2f.td.pp.f$FS90: ad_input_code_sf.w2f.pre.xb.x2w.w2f.td.f$FS90 multi-pp.pl ../OAD_support/ad_inline.f \$(wildcard ../OAD_support/ad_template.*.f)
3049          perl multi-pp.pl -inline=../OAD_support/ad_inline.f \$<          perl multi-pp.pl -inline=../OAD_support/ad_inline.f \$<
3050          # the postprocessor still gets the name wrong          # the postprocessor still gets the name wrong
3051          cat \$<.pp | sed 's/RETURN//' > \$@          cat \$<.pp | sed 's/RETURN//' > \$@
3052    
3053  # extract all transformed modules  # extract all transformed modules
3054  all_mods.xb.x2w.w2f.pp.f$FS90: ad_input_code_sf.w2f.canon.xb.x2w.w2f.rs.pp.f$FS90  all_mods.xb.x2w.w2f.pp.f$FS90: ad_input_code_sf.w2f.pre.xb.x2w.w2f.td.pp.f$FS90
3055          cat \$< | sed -n '/MODULE /,/END MODULE/p' > \$@          cat \$< | sed -n '/MODULE /,/END MODULE/p' > \$@
3056    
3057  # remove the transformed globals module from the  # remove the transformed globals module from the
3058  # transformed ad_input_code file  # transformed ad_input_code file
3059  # and remove for now the duplicate variables  # and remove for now the duplicate variables
3060  # and fix 2 data statements  # and fix 2 data statements
3061  ad_input_code.w2f.canon.xb.x2w.w2f.rs.pp.f$FS90: ad_input_code_sf.w2f.canon.xb.x2w.w2f.rs.pp.f$FS90  ad_input_code.w2f.pre.xb.x2w.w2f.td.pp.f$FS90: ad_input_code_sf.w2f.pre.xb.x2w.w2f.td.pp.f$FS90
3062          cat \$< | sed '/MODULE /,/END MODULE/d' | sed '/^      INTEGER(w2f__i4) DOLOOP_UB/d' > \$@          cat \$< | sed '/MODULE /,/END MODULE/d' | sed '/^      INTEGER(w2f__i4) DOLOOP_UB/d' > \$@
3063    
3064  # setup some links  # setup some links
# Line 3068  whirl2xaif xaif2whirl: Line 3078  whirl2xaif xaif2whirl:
3078  %.pl:  %.pl:
3079          \$(LN) \${OPENADFORTTK}/bin/\$@ .          \$(LN) \${OPENADFORTTK}/bin/\$@ .
3080    
3081  %.py:  preProcess.py:
3082          \$(LN) \${OPENADROOT}/OpenADFortTk/tools/canonicalize/\$@ .          \$(LN) \${OPENADFORTTK_BASE}/tools/SourceProcessing/\$@ .
3083    
3084  whirl2f whirl2f_be:  whirl2f whirl2f_be:
3085          \$(LN) \${OPEN64ROOT}/whirl2f/\$@ .          \$(LN) \${OPEN64ROOT}/whirl2f/\$@ .
3086    
3087  openad_adm:  oadDriver:
3088          \$(LN) \${XAIFBOOSTERROOT}/xaifBooster/algorithms/BasicBlockPreaccumulationReverse/test/t \$@          \$(LN) \${XAIFBOOSTERROOT}/xaifBooster/algorithms/BasicBlockPreaccumulationReverse/driver/oadDriver \$@
3089    
3090  # ============ end OpenAD specific section ==============  # ============ end OpenAD specific section ==============
3091    

Legend:
Removed from v.1.174  
changed lines
  Added in v.1.183

  ViewVC Help
Powered by ViewVC 1.1.22