/[MITgcm]/MITgcm/tools/genmake.hp
ViewVC logotype

Diff of /MITgcm/tools/genmake.hp

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

revision 1.1 by cnh, Wed Apr 22 19:15:31 1998 UTC revision 1.4.2.1 by cnh, Sat Jun 20 21:15:23 1998 UTC
# Line 1  Line 1 
1  #!/bin/csh -f  #!/bin/csh -f
2  #  #
3  # $Id$  # $Header$
4  #  #
5  #  Makefile generator for MITgcm UV codes  #  Makefile generator for MITgcm UV codes
6  #  #
# Line 9  Line 9 
9  set mfile = ( Makefile.hp      )  set mfile = ( Makefile.hp      )
10  set mach  = ( 'HP  HP-UX/spp '    )  set mach  = ( 'HP  HP-UX/spp '    )
11    
12    # ***************************************************************************************************
13  # Directories for source, includes, binaries and executables  # Directories for source, includes, binaries and executables
14    # ***************************************************************************************************
15  # Note  # Note
16  # o If you prefer/need everything under a single directory  # o If you prefer/need everything under a single directory
17  #   copy everything in ../psupp/src, ../model/src,  #   copy everything in ../eesupp/src, ../model/src,
18  #   ../psupp/inc and ../model/inc into a directory and then  #   ../eesupp/inc and ../model/inc into a directory and then
19  #   edit the paths below to read  #   edit the paths below to read
20  #   set PSUPP_SDIR = (  )  #   set EESUPP_SDIR = (  )
21  #   set MODEL_SDIR = (  )  #   set MODEL_SDIR  = (  )
22  #   set PSUPP_IDIR = (  )  #   set EESUPP_IDIR = (  )
23  #   set MODEL_IDIR = (  )  #   set MODEL_IDIR  = (  )
24  #   set TDIR       = (  )  #   set TDIR        = (  )
25  #   set BDIR       = (  )  #   set BDIR        = (  )
26  #   set EDIR       = (  )  #   set EDIR        = (  )
27  set PSUPP_SDIR = ( ../eesupp/src/ )  set EESUPP_SDIR = ( ../eesupp/src/ )
28  set MODEL_SDIR = ( ../model/src/ )  set MODEL_SDIR  = ( ../model/src/  )
29  set PSUPP_IDIR = ( ../psupp/inc/ )  set EESUPP_IDIR = ( ../eesupp/inc/ )
30  set MODEL_IDIR = ( ../model/inc/ )  set MODEL_IDIR  = ( ../model/inc/  )
31  set TDIR       = ( ../tools/ )  set TDIR        = ( ../tools/      )
32  set BDIR       = ( ../bin/       )  set BDIR        = ( ../bin/        )
33  set EDIR       = ( ../exe/       )  set EDIR        = ( ../exe/        )
34  set EXE        = ( barrier       )  set EXE         = ( mitgcmuv       )
35    
36  set CPP   = ( '/usr/ccs/lbin/cpp -P $(INCLUDES) -DUSE_EXEMPLAR' )  # ***************************************************************************************************
37  set FCOMP = ( 'f77 +O4 -c +U77 +Oparallel_env +Oparallel +Onoautopar ' \  # Pathnames and arguments for the commands used on this platform
38    # ***************************************************************************************************
39    set CPP   = ( '/usr/ccs/lbin/cpp -P $(INCLUDES) -DTARGET_HP' )
40    set FCOMP = ( 'mpif77 +es +O3 -c +U77 +Onoautopar ' \
41                '+Oexemplar_model +Okernel_threads +Oreport=all'  )                '+Oexemplar_model +Okernel_threads +Oreport=all'  )
42  set FCOMP0 = ( 'f77 +O0 -c +U77 +Onoautopar ' \  set FCOMP0 = ( 'mpif77 +es +O0 -c +U77 +Onoautopar ' \
43                 '+Oexemplar_model +Okernel_threads ' )                 '+Oexemplar_model +Okernel_threads ' )
44  set LINK  = ( 'f77 +O4 +U77 +Oparallel_env +Oparallel +Onoautopar ' \  set LINK  = ( 'mpif77 +O3 +U77 +Onoautopar ' \
45                '+Oexemplar_model +Okernel_threads' )                '+Oexemplar_model +Okernel_threads' )
46  set INCLUDES = ( '-I. -I$(PSUPP_IDIR) -I$(MODEL_IDIR) ' \  set LINKOPTS    = (' ' )
47                   '-I/usr/local/mpi/include' )  set INCLUDES = ( '-I. -I$(EESUPP_IDIR) -I$(MODEL_IDIR) ' \
48                     '-I/opt/mpi/include' )
49  set MAKEDEPEND = ( /opt/imake/bin/makedepend )  set MAKEDEPEND = ( /opt/imake/bin/makedepend )
50    
51    # ***************************************************************************************************
52    # Write Makefile.xxx header
53    # ***************************************************************************************************
54  echo "Creating make file ${mfile} "  echo "Creating make file ${mfile} "
55  echo "#"                    > ${mfile}  echo "#"                    > ${mfile}
56  echo "# Multithreaded + multi-processing makefile for $mach "      >> ${mfile}  echo "# Multithreaded + multi-processing makefile for $mach "        >> ${mfile}
57  echo "# This make file was generated automatically by the command" >> ${mfile}  echo "# This make file was generated automatically by the command"   >> ${mfile}
58  echo "# " \"${0}\"                                                 >> ${mfile}  echo "# " \"${0}\"                                                   >> ${mfile}
59  echo "# on `hostname`:`pwd` "                                      >> ${mfile}  echo "# on `hostname`:`pwd` "                                        >> ${mfile}
60  echo "#  " `date`                                                  >> ${mfile}  echo "#  " `date`                                                    >> ${mfile}
61  echo "# by $user"                                                  >> ${mfile}  echo "# by $user"                                                    >> ${mfile}
62  echo "# Notes    "                                                 >> ${mfile}  echo "# Notes    "                                                   >> ${mfile}
63  echo "# =====    "                                                 >> ${mfile}  echo "# =====    "                                                   >> ${mfile}
64  echo "# Exemplar parallel threads ar controlled by"                >> ${mfile}  echo "# o Solaris parallel threads are controlled by"                >> ${mfile}
65  echo "# setenv MP_NUMBER_OF_THREADS"                               >> ${mfile}  echo "#   setenv PARALLEL            "                               >> ${mfile}
66  echo "#         "                                                  >> ${mfile}  echo "# o The -stackvar option is important for multi-threaded"      >> ${mfile}
67    echo "#   execution. Without it local variables may be allocated to" >> ${mfile}
68    echo "#   global bss storage which means they are not private "      >> ${mfile}
69    echo "#   per thread. "                                              >> ${mfile}
70    echo "#         "                                                    >> ${mfile}
71  cat >> ${mfile} <<EOF  cat >> ${mfile} <<EOF
72    # EESUPP_SDIR: Directory holding parallel support routines
73  # PSUPP_SDIR: Directory holding parallel support routines  # MODEL_SDIR : Directory model code
74  # MODEL_SDIR: Directory model code  # EESUPP_IDIR: Directory holding parallel support header files
75  # PSUPP_IDIR: Directory holding parallel support header files  # MODEL_IDIR : Directory model header files
76  # MODEL_IDIR: Directory model header files  # TDIR       : Directory where build tools are stored
77  # TDIR      : Directory where build tools are stored  # BDIR       : Directory where object files are written
78  # BDIR      : Directory where object files are written  # EDIR       : Directory where executable that is generated is written
79  # EDIR      : Directory where executable that is generated is written  # INCLUDES   : Directories searched for header files
80  # INCLUDES  : Directories searched for header files  # CPP        : C-preprocessor command              
81  # CPP       : C-preprocessor command                # FCOMP      : Fortran compiler command            
82  # FCOMP     : Fortran compiler command              # LINK       : Command for link editor program          
 # LINK      : Command for link editor program            
83  # Note            # Note          
84  # ====  # ====
85  # o PSUPP_SDIR ... EDIR can all be set to the current directory if  # o EESUPP_SDIR ... EDIR can all be set to the current directory if
86  #   you want to organise things that way. Alternatively they can be  #   you want to organise things that way. Alternatively they can be
87  #   set to different directories so that code can be kept on a backed  #   set to different directories so that code can be kept on a backed
88  #   up disk while object files and executables are created on scratch  #   up disk while object files and executables are created on scratch
# Line 80  cat >> ${mfile} <<EOF Line 91  cat >> ${mfile} <<EOF
91  #   object files and executables is mounted via NFS rather than being  #   object files and executables is mounted via NFS rather than being
92  #   a local SCSI disk compilation times can increase by a factor of  #   a local SCSI disk compilation times can increase by a factor of
93  #   ten!  #   ten!
94  PSUPP_SDIR = ${PSUPP_SDIR}  EESUPP_SDIR = ${EESUPP_SDIR}
95  MODEL_SDIR = ${MODEL_SDIR}  MODEL_SDIR  = ${MODEL_SDIR}
96  PSUPP_IDIR = ${PSUPP_IDIR}  EESUPP_IDIR = ${EESUPP_IDIR}
97  MODEL_IDIR = ${MODEL_IDIR}  MODEL_IDIR  = ${MODEL_IDIR}
98  TDIR       = ${TDIR}  TDIR        = ${TDIR}
99  BDIR       = ${BDIR}    BDIR        = ${BDIR}  
100  EDIR       = ${EDIR}  EDIR        = ${EDIR}
101  INCLUDES   = ${INCLUDES}  INCLUDES    = ${INCLUDES}
102  EXE        = \$(EDIR)${EXE}  EXE         = \$(EDIR)${EXE}
103  EOF  EOF
   
104  echo "# C preprocessor   " >> ${mfile}  echo "# C preprocessor   " >> ${mfile}
105  echo 'CPP        =' ${CPP} >> ${mfile}  echo 'CPP        =' ${CPP} >> ${mfile}
106  echo "# Fortran compiler " >> ${mfile}  echo "# Fortran compiler " >> ${mfile}
# Line 98  echo 'FCOMP  = '${FCOMP}   >> ${mfile} Line 108  echo 'FCOMP  = '${FCOMP}   >> ${mfile}
108  echo 'FCOMP0 = '${FCOMP0}  >> ${mfile}  echo 'FCOMP0 = '${FCOMP0}  >> ${mfile}
109  echo "# Link editor      " >> ${mfile}  echo "# Link editor      " >> ${mfile}
110  echo 'LINK  = '${LINK}     >> ${mfile}  echo 'LINK  = '${LINK}     >> ${mfile}
111    echo 'LINKOPTS = '${LINKOPTS}     >> ${mfile}
112  echo "# Header dependency" >> ${mfile}  echo "# Header dependency" >> ${mfile}
113  echo 'MAKEDEPEND  = '${MAKEDEPEND}   >> ${mfile}  echo 'MAKEDEPEND  = '${MAKEDEPEND}   >> ${mfile}
114  echo "                   " >> ${mfile}  echo "                   " >> ${mfile}
115    
116    # ***************************************************************************************************
117  set psupp_files = ( )  # Generate build commands for individual .F files
118  set psupp_slist = ( )  # ***************************************************************************************************
119  set psupp_olist = ( )  # Execution environment code
120  if ( ${PSUPP_SDIR} != ${MODEL_SDIR} ) then  if ( ${EESUPP_SDIR} != ${MODEL_SDIR} ) then
121   set flist = `ls -1 ${PSUPP_SDIR} | grep '.*\.F'`   set  sdir      = ( ${EESUPP_SDIR}   )
122   if ( "${flist}" != "" ) then   set  sdir_pref = ( '$(EESUPP_SDIR)' )
123    foreach f ( $flist )   set  rp   = rp1
124     set fname = ( ${f:t}       )   goto make-mf-entries
125     set pf    = ( ${fname:r}.f )   rp1:
126     set of    = ( ${fname:r}.o )   set  eesupp_files = ( $files )
127     echo ${pf}: '$(PSUPP_SDIR)'${fname}   >> ${mfile}.$$   set  eesupp_slist = ( $slist )
128     echo '       @echo Preprocessing $(PSUPP_SDIR)'${fname} >> ${mfile}.$$   set  eesupp_olist = ( $olist )
    echo '       @ $(CPP) $(PSUPP_SDIR)'${fname}' > '$pf >> ${mfile}.$$  
    echo ${of}: ${pf}  >> ${mfile}.$$  
    echo '       @echo Compiling '${pf} >> ${mfile}.$$  
 #  Compile fbar.F without optimisation. This file holds the barrier  
 #  routines which rely on shared variables which can be accessed  
 #  concurrently. Optimisation knows nothing about parallel access  
 #  it assumes sequential semantics and rearranges code on that  
 #  basis.  
    if ( "${fname}" != "fbar.F" ) then  
     echo '      @ $(FCOMP) '$pf >> ${mfile}.$$  
    else  
     echo '      @ $(FCOMP0) '$pf >> ${mfile}.$$  
    endif    
    set psupp_files = ( ${psupp_files} ${fname}  )  
    set psupp_slist = ( ${psupp_slist} ${f}  )  
    set psupp_olist = ( ${psupp_olist} ${of} )  
   end  
  endif  
129  endif  endif
130    # "Model" code
131  set model_files = ( )  set  sdir      = ( ${MODEL_SDIR}   )
132  set model_slist = ( )  set  sdir_pref = ( '$(MODEL_SDIR)' )
133  set model_olist = ( )  set  rp   = rp2
134  set flist = `ls -1 ${MODEL_SDIR} | grep '.*\.F'`  goto make-mf-entries
135  if ( "${flist}" != "" ) then  rp2:
136   foreach f ( ${flist} )  set  model_files = ( $files )
137    set fname = ( ${f:t}       )  set  model_slist = ( $slist )
138    set pf    = ( ${fname:r}.f )  set  model_olist = ( $olist )
139    set of    = ( ${fname:r}.o )  
140    echo ${pf}: '$(MODEL_SDIR)'${fname}   >> ${mfile}.$$  # ***************************************************************************************************
141    echo '        @echo Preprocessing $(MODEL_SDIR)'${fname} >> ${mfile}.$$  # Generate file lists for various mmake utilities
142    echo '        @ $(CPP) $(MODEL_SDIR)'${fname}' > '$pf >> ${mfile}.$$  # ***************************************************************************************************
   echo ${of}: ${pf}  >> ${mfile}.$$  
   echo '        @echo Compiling '${pf} >> ${mfile}.$$  
   echo '        @ $(FCOMP) '$pf >> ${mfile}.$$  
   set model_files = ( ${model_files} ${fname}  )  
   set model_slist = ( ${model_slist} ${f}  )  
   set model_olist = ( ${model_olist} ${of} )  
  end  
 endif  
   
143  echo "                   " >> ${mfile}  echo "                   " >> ${mfile}
144  echo "# ===========      " >> ${mfile}  echo "# ===========      " >> ${mfile}
145  echo "# File lists       " >> ${mfile}  echo "# File lists       " >> ${mfile}
146  echo "# ===========      " >> ${mfile}  echo "# ===========      " >> ${mfile}
147  if ( $#psupp_olist == 0 ) then  set  flist = ( ${eesupp_olist} ); set fpref = ( );
148   echo 'psupp_objs = ' >> ${mfile}  set  vnam  = ( eesupp_objs )
149  else if ( $#psupp_olist == 1 ) then  set  rp = rp3
150   echo 'psupp_objs = '${psupp_olist} >> ${mfile}  goto make-mf-list
151  else  rp3:
152   echo 'psupp_objs = '$psupp_olist[1] '\' >> ${mfile}  set  flist = ( ${eesupp_slist} ); set fpref = ( '$(EESUPP_SDIR)' );
153   set psupp_count = 2  set  vnam  = ( eesupp_srcs )
154   while ( $psupp_count < $#psupp_olist )  set  rp = rp4
155    echo '             '$psupp_olist[$psupp_count] '\' >> ${mfile}  goto make-mf-list
156    @ psupp_count = $psupp_count + 1  rp4:
157   end  set  flist = ( ${eesupp_slist} ); set fpref = ( );
158   echo '             '$psupp_olist[$#psupp_olist] >> ${mfile}  set  vnam  = ( eesupp_sfil )
159  endif  set  rp = rp5
160  echo "                   " >> ${mfile}  goto make-mf-list
161  if ( $#psupp_slist == 0 ) then  rp5:
162   echo 'psupp_srcs = ' >> ${mfile}  set  flist = ( ${model_olist} ); set fpref = ( );
163  else if ( $#psupp_slist == 1 ) then  set  vnam  = ( model_objs )
164   echo 'psupp_srcs = $(PSUPP_SDIR)'${psupp_slist} >> ${mfile}  set  rp = rp6
165  else  goto make-mf-list
166   echo 'psupp_srcs = $(PSUPP_SDIR)'$psupp_slist[1] '\' >> ${mfile}  rp6:
167   set psupp_count = 2  set  flist = ( ${model_slist} ); set fpref = ( '$(MODEL_SDIR)' );
168   while ( $psupp_count < $#psupp_slist )  set  vnam  = ( model_srcs )
169    echo '             $(PSUPP_SDIR)'$psupp_slist[$psupp_count] '\' >> ${mfile}  set  rp = rp7
170    @ psupp_count = $psupp_count + 1  goto make-mf-list
171   end  rp7:
172   echo '             $(PSUPP_SDIR)'$psupp_slist[$#psupp_slist] >> ${mfile}  set  flist = ( ${model_slist} ); set fpref = ( );
173  endif  set  vnam  = ( model_sfil )
174  echo "                   " >> ${mfile}  set  rp = rp8
175  if ( $#psupp_files == 0 ) then  goto make-mf-list
176   echo 'psupp_sfil = ' >> ${mfile}  rp8:
177  else if ( $#psupp_files == 1 ) then  echo 'objs = $(eesupp_objs) $(model_objs)' >> ${mfile}
178   echo 'psupp_sfil = '${psupp_files} >> ${mfile}  echo 'srcs = $(eesupp_srcs) $(model_srcs)' >> ${mfile}
179  else  echo 'sfil = $(eesupp_sfil) $(model_sfil)' >> ${mfile}
180   echo 'psupp_sfil = '$psupp_files[1] '\' >> ${mfile}  echo "                   " >> ${mfile}
181   set psupp_count = 2  
182   while ( $psupp_count < $#psupp_files )  # ***************************************************************************************************
183    echo '             '$psupp_files[$psupp_count] '\' >> ${mfile}  # Write top-level rules for building the executable,
184    @ psupp_count = $psupp_count + 1  # generating dependencies etc...
185   end  # ***************************************************************************************************
  echo '             '$psupp_files[$#psupp_files] >> ${mfile}  
 endif  
 echo "                   " >> ${mfile}  
 if ( $#model_olist == 0 ) then  
  echo 'model_objs = ' >> ${mfile}  
 else if ( $#model_olist == 1 ) then  
  echo 'model_objs = '${model_olist} >> ${mfile}  
 else  
  echo 'model_objs = '$model_olist[1] '\' >> ${mfile}  
  set model_count = 2  
  while ( $model_count < $#model_olist )  
   echo '             '$model_olist[$model_count] '\' >> ${mfile}  
   @ model_count = $model_count + 1  
  end  
  echo '             '$model_olist[$#model_olist] >> ${mfile}  
 endif  
 echo "                   " >> ${mfile}  
 if ( $#model_slist == 0 ) then  
  echo 'model_srcs = ' >> ${mfile}  
 else if ( $#model_slist == 1 ) then  
  echo 'model_srcs = $(MODEL_SDIR)'${model_slist} >> ${mfile}  
 else  
  echo 'model_srcs = $(MODEL_SDIR)'$model_slist[1] '\' >> ${mfile}  
  set model_count = 2  
  while ( $model_count < $#model_slist )  
   echo '             $(MODEL_SDIR)'$model_slist[$model_count] '\' >> ${mfile}  
   @ model_count = $model_count + 1  
  end  
  echo '             $(MODEL_SDIR)'$model_slist[$#model_slist] >> ${mfile}  
 endif  
 echo "                   " >> ${mfile}  
 if ( $#model_files == 0 ) then  
  echo 'model_sfil = ' >> ${mfile}  
 else if ( $#model_files == 1 ) then  
  echo 'model_sfil = '${model_files} >> ${mfile}  
 else  
  echo 'model_sfil = '$model_files[1] '\' >> ${mfile}  
  set model_count = 2  
  while ( $model_count < $#model_files )  
   echo '             '$model_files[$model_count] '\' >> ${mfile}  
   @ model_count = $model_count + 1  
  end  
  echo '             '$model_files[$#model_files] >> ${mfile}  
 endif  
 echo "                   " >> ${mfile}  
 echo 'objs = $(psupp_objs) $(model_objs)' >> ${mfile}  
 echo 'srcs = $(psupp_srcs) $(model_srcs)' >> ${mfile}  
 echo 'sfil = $(psupp_sfil) $(model_sfil)' >> ${mfile}  
 echo "                   " >> ${mfile}  
186  echo "# ===========      " >> ${mfile}  echo "# ===========      " >> ${mfile}
187  echo "# Begin rules      " >> ${mfile}  echo "# Begin rules      " >> ${mfile}
188  echo "# ===========      " >> ${mfile}  echo "# ===========      " >> ${mfile}
189  echo "                   " >> ${mfile}  echo "                   " >> ${mfile}
190  echo '$(EXE): $(objs)    ' >> ${mfile}  echo '$(EXE): $(objs)    ' >> ${mfile}
191  echo '  $(LINK) -o $(EXE) $(objs)' >> ${mfile}  echo '  $(LINK) -o $(EXE) $(objs) $(LINKOPTS)' >> ${mfile}
192  echo "                   " >> ${mfile}  echo "                   " >> ${mfile}
193  echo 'clean:  ' >> ${mfile}  echo 'clean:  ' >> ${mfile}
194  echo '  rm *.o *.f *.out *.cmp   ' >> ${mfile}  echo '  rm *.o *.f *.out *.cmp   ' >> ${mfile}
# Line 261  echo "                   " >> ${mfile} Line 196  echo "                   " >> ${mfile}
196  echo 'depend:  ' >> ${mfile}  echo 'depend:  ' >> ${mfile}
197  echo '  @-ln -s $(srcs) . ;$(MAKEDEPEND) -o .f -f $(TDIR)'${mfile}' $(INCLUDES) $(sfil) ' >> ${mfile}  echo '  @-ln -s $(srcs) . ;$(MAKEDEPEND) -o .f -f $(TDIR)'${mfile}' $(INCLUDES) $(sfil) ' >> ${mfile}
198  echo "                   " >> ${mfile}  echo "                   " >> ${mfile}
199    
200    # ***************************************************************************************************
201    # Add per file dependencies
202    # ***************************************************************************************************
203  cat ${mfile}.$$ >> ${mfile}  cat ${mfile}.$$ >> ${mfile}
204  \rm ${mfile}.$$  \rm ${mfile}.$$
205    
206    # ***************************************************************************************************
207    # THE END
208    # ***************************************************************************************************
209    exit
210    
211    # ***************************************************************************************************
212    # This block generates the commands to turn a .F file into a .o file.
213    # It may need to be customised for different platforms.
214    # ***************************************************************************************************
215    make-mf-entries:
216    set files = ( );
217    set slist = ( );
218    set olist = ( );
219    set flist = `ls -1 ${sdir} | grep '.*\.F'`
220    if ( "${flist}" != "" ) then
221     foreach f ( $flist )
222      set fname = ( ${f:t}       )
223      set pf    = ( ${fname:r}.f )
224      set of    = ( ${fname:r}.o )
225      echo ${pf}: "${sdir_pref}"${fname}   >> ${mfile}.$$
226      echo '        @echo Preprocessing '"${sdir_pref}"${fname} >> ${mfile}.$$
227      echo '        @ $(CPP) '"${sdir_pref}"${fname}' > '$pf >> ${mfile}.$$
228       echo ${of}: ${pf}  >> ${mfile}.$$
229       echo '       @echo Compiling '${pf} >> ${mfile}.$$
230    #  Compile fbar.F without optimisation. This file holds the barrier
231    #  routines which rely on shared variables which can be accessed
232    #  concurrently. Optimisation knows nothing about parallel access
233    #  it assumes sequential semantics and rearranges code on that
234    #  basis. This can be harmful here!
235       if ( "${fname}" == "barrier.F" || "${fname}" == "different_multiple.F" ) then
236        echo '      @ $(FCOMP0) '$pf >> ${mfile}.$$
237       else
238        echo '      @ $(FCOMP) '$pf >> ${mfile}.$$
239       endif  
240       set files = ( ${files} ${fname}  )
241       set slist = ( ${slist} ${f}  )
242       set olist = ( ${olist} ${of} )
243      end
244     endif
245    endif
246    goto ${rp}
247    
248    make-mf-list:
249    if ( $#flist == 0 ) then
250     echo ${vnam} = >> ${mfile}
251    else if ( $#flist == 1 ) then
252     echo ${vnam} = "${fpref}"${flist} >> ${mfile}
253    else
254     echo ${vnam} = "${fpref}"$flist[1] '\' >> ${mfile}
255     set count = 2
256     while ( $count < $#flist )
257      echo '             '"${fpref}"$flist[$count] '\' >> ${mfile}
258      @ count = $count + 1
259     end
260     echo '             '"${fpref}"$flist[$#flist] >> ${mfile}
261    endif
262    echo "                   " >> ${mfile}
263    goto $rp
264    
265  # $ Id: $  # $ Id: $
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.4.2.1
  ViewVC Help
Powered by ViewVC 1.1.22