This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Re: local($tied->{foo}) leaks
[perl5.git] / hints / unicos.sh
1 case `uname -r` in
2 6.1*) shellflags="-m+65536" ;;
3 esac
4 case "$optimize" in
5 # If we used fastmd (the default) integer values would be limited to 46 bits.
6 # --Mark P. Lutz
7 '') optimize="$optimize -h nofastmd" ;;
8 esac
9 # The default is to die in runtime on math overflows.
10 # Let's not do that. --jhi
11 ccflags="$ccflags -h matherror=errno" 
12 # Give int((2/3)*3) a chance to be 2, not 1. --jhi
13 case "`uname -m`" in
14 "CRAY TS")      ;; # -h rounddiv not available here
15 *)              ccflags="$ccflags -h rounddiv" ;;
16 esac
17 # Avoid an optimizer bug where a volatile variables
18 # isn't correctly saved and restored --Mark P. Lutz 
19 pp_ctl_cflags='ccflags="$ccflags -h scalar0 -h vector0"'
20 # Otherwise the unpack %65c checksums will fail.
21 pp_pack_cflags='optimize="$ccflags -h scalar0 -h vector0"'
22 case "$usemymalloc" in
23 '') # The perl malloc.c SHOULD work says Ilya.
24     # But for the time being (5.004_68), alas, it doesn't. --jhi
25     # usemymalloc='y'
26     # ccflags="$ccflags -DNO_RCHECK"
27     usemymalloc='n'
28     ;;
29 esac
30 # Configure gets fooled for some reason, these do not exist.
31 d_getpgid='undef'
32 d_setitimer='undef'
33 # These exist but do not really work.
34 d_setregid='undef'
35 d_setreuid='undef'
36 # No shared libraries.
37 so='none'
38 # Threads call-back unit.
39 cat > UU/usethreads.cbu <<'EOCBU'
40 # This script UU/usethreads.cbu will get 'called-back' by Configure
41 # after it has prompted the user for whether to use threads.
42 case "$usethreads" in
43 $define|true|[yY]*)
44         set `echo X "$libswanted "| sed -e "s/ c / pthread c /"`
45         shift
46         libswanted="$*"
47         ;;
48 esac
49 EOCBU