Parent Directory | Revision Log | Revision Graph
try to avoid the need for file "oadtempflile"; should works as long as this script is not moved (or linked) elsewhere, outside of OADTOOLS (i.e., tools/OAD_support).
1 | #! /usr/bin/env bash |
2 | OADTOOLS=`dirname $0` |
3 | #OADTOOLS=`awk '{print $1 }' < oadtempflile` |
4 | echo "#generated file" > temp.sed |
5 | for i in `grep '^ *SUBROUTINE ' $1 | awk '{print $2}'` |
6 | do |
7 | # extract the name |
8 | srName=${i%%\(*} |
9 | echo "/^ *SUBROUTINE $srName(/i\\" >> temp.sed |
10 | case "$srName" in |
11 | "OpenAD_main_do_loop" ) |
12 | echo "c\$openad XXX Template $OADTOOLS/ad_template.revolve.f" >> temp.sed |
13 | ;; |
14 | "OpenAD_cg2d" ) |
15 | echo "c\$openad XXX Template $OADTOOLS/ad_template.sa_cg2d.f" >> temp.sed |
16 | ;; |
17 | "OpenAD_exch1_rl" | \ |
18 | "OpenAD_exch1_rs" | \ |
19 | "OpenAD_global_max_r8" | \ |
20 | "OpenAD_global_sum_r8" ) |
21 | tmpName=${srName#OpenAD_} |
22 | echo "c\$openad XXX Template $OADTOOLS/ad_template.${tmpName}.f" >> temp.sed |
23 | ;; |
24 | *) |
25 | echo "test $OADTOOLS" |
26 | echo "c\$openad XXX Template $OADTOOLS/ad_template.split.f" >> temp.sed |
27 | ;; |
28 | esac |
29 | done |
30 | cat $1 | sed -f temp.sed > $2 |
ViewVC Help | |
Powered by ViewVC 1.1.22 |