This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
perl 4.0 patch 1: (combined patch)
[perl5.git] / cflags.SH
CommitLineData
1c3d792e
LW
1case $CONFIG in
2'')
3 if test ! -f config.sh; then
4 ln ../config.sh . || \
5 ln ../../config.sh . || \
6 ln ../../../config.sh . || \
7 (echo "Can't find config.sh."; exit 1)
8 fi 2>/dev/null
9 . ./config.sh
10 ;;
11esac
12case "$0" in
13*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
14esac
15
16also=': '
17case $# in
181) also='echo 1>&2 " CFLAGS = "'
19esac
20
21case $# in
220) set *.c; echo "The current C flags are:" ;;
23*) set `echo "$* " | sed 's/\.o /.c /g'`
24esac
25for file do
26
27 case "$#" in
28 1) ;;
29 *) echo $n " $file $c" ;;
30 esac
31
32 case "$file" in
33 array.c) ;;
34 cmd.c) ;;
35 cons.c) ;;
36 consarg.c) ;;
37 doarg.c) ;;
38 doio.c) ;;
39 dolist.c) ;;
40 dump.c) ;;
41 eval.c) ;;
42 form.c) ;;
43 hash.c) ;;
44 malloc.c) ;;
45 perl.c) ;;
46 perly.c) ;;
47 regcomp.c) ;;
48 regexec.c) ;;
49 stab.c) ;;
50 str.c) ;;
51 toke.c) ;;
52 usersub.c) ;;
53 util.c) ;;
54 tarray.c) ;;
55 tcmd.c) ;;
56 tcons.c) ;;
57 tconsarg.c) ;;
58 tdoarg.c) ;;
59 tdoio.c) ;;
60 tdolist.c) ;;
61 tdump.c) ;;
62 teval.c) ;;
63 tform.c) ;;
64 thash.c) ;;
65 tmalloc.c) ;;
66 tperl.c) ;;
67 tperly.c) ;;
68 tregcomp.c) ;;
69 tregexec.c) ;;
70 tstab.c) ;;
71 tstr.c) ;;
72 ttoke.c) ;;
73 tusersub.c) ;;
74 tutil.c) ;;
75 *) ;;
76 esac
77
78 echo "$ccflags $optimize $large $split"
79 eval "$also $ccflags $optimize $large $split"
80done