perl 5.0 alpha 6
[p5sagit/p5-mst-13.2.git] / x2p / cflags
1 case "$0" in
2 */*) cd `expr X$0 : 'X\(.*\)/'` ;;
3 esac
4 case $CONFIG in
5 '')
6     if test ! -f config.sh; then
7         ln ../config.sh . || \
8         ln ../../config.sh . || \
9         ln ../../../config.sh . || \
10         (echo "Can't find config.sh."; exit 1)
11     fi 2>/dev/null
12     . ./config.sh
13     ;;
14 esac
15
16 also=': '
17 case $# in
18 1) also='echo 1>&2 "      CCCMD = "'
19 esac
20
21 case $# in
22 0) set *.c; echo "The current C flags are:" ;;
23 esac
24
25 set `echo "$* " | sed 's/\.[oc] / /g'`
26
27 for file do
28
29     case "$#" in
30     1) ;;
31     *) echo $n "    $file.c     $c" ;;
32     esac
33
34     : allow variables like str_cflags to be evaluated
35
36     eval 'eval ${'"${file}_cflags"'-""}'
37
38     : or customize here
39
40     case "$file" in
41     a2p) ;;
42     a2py) ;;
43     hash) ;;
44     str) ;;
45     util) ;;
46     walk) ;;
47     *) ;;
48     esac
49
50     echo "$cc -c $ccflags $optimize $large $split"
51     eval "$also "'"$cc -c $ccflags $optimize $large $split"'
52
53     . ./config.sh
54
55 done