This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Fix Compress::Zlib test boilerplate
[perl5.git] / cflags.SH
CommitLineData
a02608de 1case $PERL_CONFIG_SH in
1c3d792e 2'')
a0d0e21e
LW
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
LW
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
LW
16case "$0" in
17*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
18esac
2b317908
LW
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
LW
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
LW
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
PG
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
IZ
50 eval "$1"
51 shift
52 ;;
53esac
54
1c3d792e
LW
55also=': '
56case $# in
2b317908 571) also='echo 1>&2 " CCCMD = "'
1c3d792e
LW
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
LW
66for file do
67
68 case "$#" in
69 1) ;;
2b317908 70 *) echo $n " $file.c $c" ;;
1c3d792e
LW
71 esac
72
2b317908
LW
73 : allow variables like toke_cflags to be evaluated
74
8736538c
AS
75 if echo $file | grep -v / >/dev/null
76 then
77 eval 'eval ${'"${file}_cflags"'-""}'
78 fi
2b317908
LW
79
80 : or customize here
81
1c3d792e 82 case "$file" in
a0d0e21e
LW
83 DB_File) ;;
84 GDBM_File) ;;
2304df62
AD
85 NDBM_File) ;;
86 ODBM_File) ;;
87 POSIX) ;;
88 SDBM_File) ;;
89 av) ;;
4b6be2dd 90 byterun) ;;
2304df62
AD
91 deb) ;;
92 dl) ;;
2b317908 93 doio) ;;
2304df62 94 doop) ;;
2b317908 95 dump) ;;
2304df62
AD
96 gv) ;;
97 hv) ;;
a6ec74c1 98 locale) ;;
2304df62 99 main) ;;
2b317908 100 malloc) ;;
2304df62
AD
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
LW
110 pp_ctl) ;;
111 pp_hot) ;;
a6ec74c1 112 pp_pack) ;;
a0d0e21e 113 pp_sys) ;;
2b317908
LW
114 regcomp) ;;
115 regexec) ;;
2304df62
AD
116 run) ;;
117 scope) ;;
118 sv) ;;
119 taint) ;;
2b317908
LW
120 toke) ;;
121 usersub) ;;
122 util) ;;
1c3d792e
LW
123 *) ;;
124 esac
125
93189314 126# Add -Wall for the core modules iff gcc and not already -Wall
6a21b602
JH
127warn=''
128case "$gccversion" in
129'') ;;
42a11659 130Intel*) ;;
6a21b602
JH
131*) case "$ccflags" in
132 *-Wall*) ;;
93189314
JH
133 *) warn="$warn -Wall" ;;
134 esac
135 case "$gccansipedantic" in
136 define)
a0426075
MB
137 case "$gccversion" in
138 [12]*) ;; # gcc versions 1 (gasp!) and 2 are not good for this.
139 *) case "$osname" in
140 # Add -ansi -pedantic only for known platforms.
141 aix|dec_osf|freebsd|hpux|irix|linux)
142 ansipedantic="-ansi -pedantic" ;;
143 solaris)
93189314 144# Can't add -ansi for Solaris.
6a21b602
JH
145# Off_t/off_t is a struct in Solaris with largefiles, and with -ansi
146# that struct cannot be compared with a flat integer, such as a STRLEN.
147# The -ansi will also cause a lot of noise in Solaris because of:
148# /usr/include/sys/resource.h:148: warning: `struct rlimit64' declared inside parameter list
a0426075
MB
149 ansipedantic="-pedantic" ;;
150 esac
151 for i in $ansipedantic
152 do
153 case "$ccflags" in
154 *$i*) ;;
155 *) warn="$warn $i" ;;
156 esac
157 done
158 case "$warn$ccflags" in
159 *-pedantic*) warn="$warn -DPERL_GCC_PEDANTIC" ;;
93189314 160 esac
a0426075
MB
161 ;;
162 esac
163 ;;
6a21b602
JH
164 esac
165 ;;
166esac
167
69c7f294
NC
168if test -f .patch; then
169 ccflags="-DPERL_PATCHNUM=`cat .patch` $ccflags"
170fi
171
c4f23d77 172 : Can we perhaps use $ansi2knr here
75550b4e
PG
173 echo "$cc -c -DPERL_CORE $ccflags $optimize $warn"
174 eval "$also "'"$cc -DPERL_CORE -c $ccflags $optimize $warn"'
2b317908 175
a0d0e21e 176 . $TOP/config.sh
2b317908 177
1c3d792e 178done
2b317908 179!NO!SUBS!
a0d0e21e 180chmod 755 cflags
2b317908 181$eunicefix cflags