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 | jmc | 1.3 | #! /usr/bin/env bash |
2 | OADTOOLS=`dirname $0` | ||
3 | #OADTOOLS=`awk '{print $1 }' < oadtempflile` | ||
4 | heimbach | 1.1 | echo "#generated file" > temp.sed |
5 | for i in `grep '^ *SUBROUTINE ' $1 | awk '{print $2}'` | ||
6 | jmc | 1.3 | do |
7 | heimbach | 1.1 | # extract the name |
8 | srName=${i%%\(*} | ||
9 | echo "/^ *SUBROUTINE $srName(/i\\" >> temp.sed | ||
10 | jmc | 1.3 | case "$srName" in |
11 | utke | 1.2 | "OpenAD_main_do_loop" ) |
12 | echo "c\$openad XXX Template $OADTOOLS/ad_template.revolve.f" >> temp.sed | ||
13 | heimbach | 1.1 | ;; |
14 | jmc | 1.3 | "OpenAD_cg2d" ) |
15 | heimbach | 1.1 | echo "c\$openad XXX Template $OADTOOLS/ad_template.sa_cg2d.f" >> temp.sed |
16 | ;; | ||
17 | "OpenAD_exch1_rl" | \ | ||
18 | "OpenAD_exch1_rs" | \ | ||
19 | jmc | 1.3 | "OpenAD_global_max_r8" | \ |
20 | "OpenAD_global_sum_r8" ) | ||
21 | heimbach | 1.1 | tmpName=${srName#OpenAD_} |
22 | echo "c\$openad XXX Template $OADTOOLS/ad_template.${tmpName}.f" >> temp.sed | ||
23 | ;; | ||
24 | jmc | 1.3 | *) |
25 | heimbach | 1.1 | 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 |