[Encode] 1.77 Released
[p5sagit/p5-mst-13.2.git] / cflags.SH
CommitLineData
a02608de 1case $PERL_CONFIG_SH in
1c3d792e 2'')
a0d0e21e 3 if test -f config.sh; then TOP=.;
4 elif test -f ../config.sh; then TOP=..;
5 elif test -f ../../config.sh; then TOP=../..;
6 elif test -f ../../../config.sh; then TOP=../../..;
7 elif test -f ../../../../config.sh; then TOP=../../../..;
8 else
9 echo "Can't find config.sh."; exit 1
10 fi
11 . $TOP/config.sh
12 ;;
1c3d792e 13esac
2b317908 14: This forces SH files to create target in same directory as SH file.
15: This is so that make depend always knows where to find SH derivatives.
1c3d792e 16case "$0" in
17*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
18esac
2b317908 19echo "Extracting cflags (with variable substitutions)"
20: This section of the file will have variable substitutions done on it.
21: Move anything that needs config subs from !NO!SUBS! section to !GROK!THIS!.
22: Protect any dollar signs and backticks that you do not want interpreted
23: by putting a backslash in front. You may delete these comments.
165b7424 24rm -f cflags
2b317908 25$spitshell >cflags <<!GROK!THIS!
ecfc5424 26$startsh
2b317908 27!GROK!THIS!
28
29: In the following dollars and backticks do not need the extra backslash.
30$spitshell >>cflags <<'!NO!SUBS!'
a02608de 31case $PERL_CONFIG_SH in
2b317908 32'')
a0d0e21e 33 if test -f config.sh; then TOP=.;
34 elif test -f ../config.sh; then TOP=..;
35 elif test -f ../../config.sh; then TOP=../..;
36 elif test -f ../../../config.sh; then TOP=../../..;
37 elif test -f ../../../../config.sh; then TOP=../../../..;
38 else
39 echo "Can't find config.sh."; exit 1
40 fi
41 . $TOP/config.sh
42 ;;
43esac
44
75550b4e 45: syntax: cflags [optimize=XXX] [file[.suffix]]
46: displays the compiler command line for file
47
1167a30e 48case "X$1" in
26102cc7 49Xoptimize=*|X"optimize=*")
1167a30e 50 eval "$1"
51 shift
52 ;;
53esac
54
1c3d792e 55also=': '
56case $# in
2b317908 571) also='echo 1>&2 " CCCMD = "'
1c3d792e 58esac
59
60case $# in
610) set *.c; echo "The current C flags are:" ;;
1c3d792e 62esac
2b317908 63
578789a7 64set `echo "$* " | sed -e 's/\.[oc] / /g' -e 's/\.obj / /g' -e "s/\\$obj_ext / /g"`
2b317908 65
1c3d792e 66for file do
67
68 case "$#" in
69 1) ;;
2b317908 70 *) echo $n " $file.c $c" ;;
1c3d792e 71 esac
72
2b317908 73 : allow variables like toke_cflags to be evaluated
74
8736538c 75 if echo $file | grep -v / >/dev/null
76 then
77 eval 'eval ${'"${file}_cflags"'-""}'
78 fi
2b317908 79
80 : or customize here
81
1c3d792e 82 case "$file" in
a0d0e21e 83 DB_File) ;;
84 GDBM_File) ;;
2304df62 85 NDBM_File) ;;
86 ODBM_File) ;;
87 POSIX) ;;
88 SDBM_File) ;;
89 av) ;;
4b6be2dd 90 byterun) ;;
2304df62 91 deb) ;;
92 dl) ;;
2b317908 93 doio) ;;
2304df62 94 doop) ;;
2b317908 95 dump) ;;
2304df62 96 gv) ;;
97 hv) ;;
a6ec74c1 98 locale) ;;
2304df62 99 main) ;;
2b317908 100 malloc) ;;
2304df62 101 mg) ;;
102 miniperlmain) ;;
a6ec74c1 103 numeric) ;;
2304df62 104 op) ;;
2b317908 105 perl) ;;
6f4183fe 106 perlapi) ;;
2304df62 107 perlmain) ;;
2b317908 108 perly) ;;
2304df62 109 pp) ;;
a0d0e21e 110 pp_ctl) ;;
111 pp_hot) ;;
a6ec74c1 112 pp_pack) ;;
a0d0e21e 113 pp_sys) ;;
2b317908 114 regcomp) ;;
115 regexec) ;;
2304df62 116 run) ;;
117 scope) ;;
118 sv) ;;
119 taint) ;;
2b317908 120 toke) ;;
121 usersub) ;;
122 util) ;;
1c3d792e 123 *) ;;
124 esac
125
93189314 126# Add -Wall for the core modules iff gcc and not already -Wall
6a21b602 127warn=''
128case "$gccversion" in
129'') ;;
130*) case "$ccflags" in
131 *-Wall*) ;;
93189314 132 *) warn="$warn -Wall" ;;
133 esac
134 case "$gccansipedantic" in
135 define)
a0426075 136 case "$gccversion" in
137 [12]*) ;; # gcc versions 1 (gasp!) and 2 are not good for this.
138 *) case "$osname" in
139 # Add -ansi -pedantic only for known platforms.
140 aix|dec_osf|freebsd|hpux|irix|linux)
141 ansipedantic="-ansi -pedantic" ;;
142 solaris)
93189314 143# Can't add -ansi for Solaris.
6a21b602 144# Off_t/off_t is a struct in Solaris with largefiles, and with -ansi
145# that struct cannot be compared with a flat integer, such as a STRLEN.
146# The -ansi will also cause a lot of noise in Solaris because of:
147# /usr/include/sys/resource.h:148: warning: `struct rlimit64' declared inside parameter list
a0426075 148 ansipedantic="-pedantic" ;;
149 esac
150 for i in $ansipedantic
151 do
152 case "$ccflags" in
153 *$i*) ;;
154 *) warn="$warn $i" ;;
155 esac
156 done
157 case "$warn$ccflags" in
158 *-pedantic*) warn="$warn -DPERL_GCC_PEDANTIC" ;;
93189314 159 esac
a0426075 160 ;;
161 esac
162 ;;
6a21b602 163 esac
164 ;;
165esac
166
c4f23d77 167 : Can we perhaps use $ansi2knr here
75550b4e 168 echo "$cc -c -DPERL_CORE $ccflags $optimize $warn"
169 eval "$also "'"$cc -DPERL_CORE -c $ccflags $optimize $warn"'
2b317908 170
a0d0e21e 171 . $TOP/config.sh
2b317908 172
1c3d792e 173done
2b317908 174!NO!SUBS!
a0d0e21e 175chmod 755 cflags
2b317908 176$eunicefix cflags