1 |
cnh |
1.1 |
#!/bin/csh -f |
2 |
|
|
# |
3 |
|
|
# Generate some make file dependency entries for a Fortran 90 file that employs "use". |
4 |
|
|
# Note: We assume that the name of a module and the same of source are the same. |
5 |
|
|
# |
6 |
|
|
set flist = ( `echo *.F90` ) |
7 |
|
|
foreach filename ( $flist ) |
8 |
|
|
set dirlist = ( . ) |
9 |
|
|
|
10 |
|
|
# Try and find some use statements |
11 |
|
|
set modreflist = `cat $filename | grep '[ *] use ' | awk '{print $2}' | sed s'/,//'` |
12 |
|
|
|
13 |
|
|
set depfiles = ( ) |
14 |
|
|
foreach m ( $modreflist ) |
15 |
|
|
set depfile = ( ) |
16 |
|
|
foreach d ( $dirlist ) |
17 |
|
|
if ( -f $m.F90 ) then |
18 |
|
|
if ( $depfile == "" ) then |
19 |
|
|
set depfile = ( $m.o ) |
20 |
|
|
endif |
21 |
|
|
endif |
22 |
|
|
end |
23 |
|
|
set depfiles = ( $depfiles $depfile ) |
24 |
|
|
end |
25 |
|
|
echo ${filename:r}.f90: $depfiles |
26 |
|
|
end |