Front page | perl.perl5.porters |
Postings from May 2015
[perl #125298] warnings.t one failure in IRIX 6.5
Thread Previous
From:
Jarkko Hietaniemi
Date:
May 31, 2015 19:29
Subject:
[perl #125298] warnings.t one failure in IRIX 6.5
Message ID:
rt-4.0.18-27900-1433100575-1330.125298-75-0@perl.org
# New Ticket Created by Jarkko Hietaniemi
# Please include the string: [perl #125298]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org/Ticket/Display.html?id=125298 >
I thought I had filed this already, but cannot find it ... so here goes, with blead, which is 5.22.0 minus epsilon.
Certainly not a showstopper for 5.22.
lib/warnings .................................................. PROG:
my $nan = sin 9**9**9;
if ($nan == $nan) {
print <<EOM ;
SKIPPED
# No nan support
EOM
exit ;
}
use warnings 'uninitialized';
# The optimised {$a<=>$b} case should behave the same way as unoptimised.
@sort = sort { ($a)[0] <=> $b } 1, $nan;
@sort = sort { $a <=> $b } 1, $nan;
EXPECTED:
Use of uninitialized value in sort at - line 11.
Use of uninitialized value in sort at - line 12.
GOT:
Use of uninitialized value in sort at - line 11.
# Failed test 260 - at lib/warnings/9uninit line 671
FAILED at test 260
--
./perl -Ilib -V
Summary of my perl5 (revision 5 version 22 subversion 0) configuration:
Platform:
osname=irix, osvers=6.5, archname=IP35-irix
uname='irix64 irix 6.5 07202013 ip35 '
config_args='-des -Dusedevel'
hint=recommended, useposix=true, d_sigaction=define
useithreads=undef, usemultiplicity=undef
use64bitint=undef, use64bitall=undef, uselongdouble=undef
usemymalloc=n, bincompat5005=undef
Compiler:
cc='cc -n32', ccflags ='-D_BSD_TYPES -D_BSD_TIME -woff 1184,1552 -c99 -U__IN
LINE_INTRINSICS -DLANGUAGE_C',
optimize='-O3 -OPT:Olimit=0:space=ON',
cppflags='-D_BSD_TYPES -D_BSD_TIME -woff 1184,1552 -c99 -U__INLINE_INTRINSIC
S -DLANGUAGE_C'
ccversion='MIPSpro Compilers: Version 7.4', gccversion='', gccosandvers=''
intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=4321, doublekind=4
d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16, longdbl
kind=6
ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize
=8
alignbytes=8, prototype=define
Linker and Libraries:
ld='cc -n32', ldflags =' -Wl,-woff,84 -L/usr/local/lib'
libpth=/usr/local/lib /usr/lib32 /lib32 /lib /usr/lib /lib64 /usr/lib64
libs=-lcl -lpthread -ldb -lm -lc
perllibs=-lcl -lpthread -lm -lc
libc=/usr/lib32/libc.so, so=so, useshrplib=false, libperl=libperl.a
gnulibc_version=''
Dynamic Linking:
dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags=' '
cccdlflags=' ', lddlflags='-n32 -shared -L/usr/local/lib'
Thread Previous