This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
SvUTF8_off() in do_join can be unconditional.
[perl5.git] / hints / unicos.sh
CommitLineData
68decaef
LW
1case `uname -r` in
26.1*) shellflags="-m+65536" ;;
3esac
c4f23d77 4case "$optimize" in
b84d4f81 5# If we used fastmd (the default) integer values would be limited to 46 bits.
214f2c7f 6# --Mark P. Lutz
a20e3af3 7'') optimize="$optimize -h nofastmd" ;;
8bda1795 8esac
f3ff050f 9# The default is to die in runtime on math overflows.
a20e3af3 10# Let's not do that. --jhi
45ff97fd 11ccflags="$ccflags -h matherror=errno"
fdf48296
JH
12
13# Cray floating point (cfp) CPUs need -h rounddiv
14# (It gives int((2/3)*3) a chance to be 2, not 1. --jhi)
15# (but IEEE CPUs, IEEE/ieee/CPE1 CPUs should not have -h rounddiv,
16# since the compiler on those CPUs doesn't even support the option.)
fcb0901b
JH
17if /etc/cpu -i | grep -q cfp
18then
19 ccflags="$ccflags -h rounddiv"
20fi
fdf48296 21
214f2c7f
JH
22# Avoid an optimizer bug where a volatile variables
23# isn't correctly saved and restored --Mark P. Lutz
24pp_ctl_cflags='ccflags="$ccflags -h scalar0 -h vector0"'
d8526ec6 25# Otherwise the unpack %65c checksums will fail.
23fb6509 26pp_pack_cflags='optimize="$ccflags -h scalar0 -h vector0"'
693762b4 27case "$usemymalloc" in
214f2c7f 28'') # The perl malloc.c SHOULD work says Ilya.
8bda1795 29 # But for the time being (5.004_68), alas, it doesn't. --jhi
5283c38d
JH
30 # usemymalloc='y'
31 # ccflags="$ccflags -DNO_RCHECK"
32 usemymalloc='n'
c4f23d77 33 ;;
693762b4 34esac
333b7451 35# Configure gets fooled for some reason, these do not exist.
e1f2cf02 36d_getpgid='undef'
333b7451 37d_setitimer='undef'
214f2c7f
JH
38# These exist but do not really work.
39d_setregid='undef'
40d_setreuid='undef'
bc2e71b5
JH
41# No shared libraries.
42so='none'
7d4807db
JH
43# No dynaloading.
44d_dlopen='undef'
45i_dlfcn='undef'
bc2e71b5 46# Threads call-back unit.
acbe1256
JH
47cat > UU/usethreads.cbu <<'EOCBU'
48# This script UU/usethreads.cbu will get 'called-back' by Configure
49# after it has prompted the user for whether to use threads.
50case "$usethreads" in
51$define|true|[yY]*)
52 set `echo X "$libswanted "| sed -e "s/ c / pthread c /"`
53 shift
54 libswanted="$*"
55 ;;
56esac
57EOCBU