1 case $PERL_CONFIG_SH in
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=../../../..;
9 echo "Can't find config.sh."; exit 1
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.
17 */*) cd `expr X$0 : 'X\(.*\)/'` ;;
22 # Add -Wall for the core modules iff gcc and not already -Wall
25 Intel*) ;; # The Intel C++ plays gcc on TV but is not really it.
28 *) warn="$warn -Wall" ;;
33 # The gcc -ansi -pedantic require their own dance, too.
37 *) case "$gccansipedantic" in
40 [12]*) ;; # gcc versions 1 (gasp!) and 2 are not good for this.
42 # Add -ansi -pedantic only for known platforms.
43 aix|dec_osf|freebsd|hpux|irix|linux)
44 ansipedantic="-ansi -pedantic" ;;
46 # Can't add -ansi for Solaris.
47 # Off_t/off_t is a struct in Solaris with largefiles, and with -ansi
48 # that struct cannot be compared with a flat integer, such as a STRLEN.
49 # The -ansi will also cause a lot of noise in Solaris because of:
50 # /usr/include/sys/resource.h:148: warning: `struct rlimit64' declared inside parameter list
51 ansipedantic="-pedantic" ;;
53 for i in $ansipedantic
60 case "$warn$ccflags" in
61 *-pedantic*) warn="$warn -DPERL_GCC_PEDANTIC" ;;
70 # Further gcc warning options.
75 *) for opt in '' extra declaration-after-statement endif-labels
79 *) case "`echo >_cflags.c | $cc -W$opt -c _cflags.c -o _cflags.o 2>&1`" in
82 *) warn="$warn -W$opt" ;;
86 rm -f _cflags.c cflags.o
91 echo "Extracting cflags (with variable substitutions)"
92 : This section of the file will have variable substitutions done on it.
93 : Move anything that needs config subs from !NO!SUBS! section to !GROK!THIS!.
94 : Protect any dollar signs and backticks that you do not want interpreted
95 : by putting a backslash in front. You may delete these comments.
97 $spitshell >cflags <<!GROK!THIS!
105 : In the following dollars and backticks do not need the extra backslash.
106 $spitshell >>cflags <<'!NO!SUBS!'
107 case $PERL_CONFIG_SH in
109 if test -f config.sh; then TOP=.;
110 elif test -f ../config.sh; then TOP=..;
111 elif test -f ../../config.sh; then TOP=../..;
112 elif test -f ../../../config.sh; then TOP=../../..;
113 elif test -f ../../../../config.sh; then TOP=../../../..;
115 echo "Can't find config.sh."; exit 1
121 : syntax: cflags [optimize=XXX] [file[.suffix]]
122 : displays the compiler command line for file
125 Xoptimize=*|X"optimize=*")
133 1) also='echo 1>&2 " CCCMD = "'
137 0) set *.c; echo "The current C flags are:" ;;
140 set `echo "$* " | sed -e 's/\.[oc] / /g' -e 's/\.obj / /g' -e "s/\\$obj_ext / /g"`
146 *) echo $n " $file.c $c" ;;
149 : allow variables like toke_cflags to be evaluated
151 if echo $file | grep -v / >/dev/null
153 eval 'eval ${'"${file}_cflags"'-""}'
202 if test -f .patch; then
203 ccflags="-DPERL_PATCHNUM=`cat .patch` $ccflags"
206 : Can we perhaps use $ansi2knr here
207 echo "$cc -c -DPERL_CORE $ccflags $optimize $warn"
208 eval "$also "'"$cc -DPERL_CORE -c $ccflags $optimize $warn"'