| Subject: | Segmentation fault when sorting result of uniq with undefs in array and warnings enabled |
$ perl -e 'use warnings; my @t = (undef,undef); use List::MoreUtils; print sort List::MoreUtils::uniq @t'
Segmentation fault
perl v5.24.1
Platform:
osname=linux, osvers=3.2.50-vs2.3.2.16-beng, archname=x86_64-linux
uname='linux b-gr-dev.v.l 3.2.50-vs2.3.2.16-beng #1 smp fri aug 30 16:43:33 bst 2013 x86_64 gnulinux '
config_args='-de -Dprefix=/home/ppabian/.perl5/perls/perl-5.24.1 -Duserelocatableinc -Duse64bitall -Doptimize=-O2 -march=native -pipe -Aeval:scriptdir=/home/ppabian/.perl5/perls/perl-5.24.1/bin'
hint=recommended, useposix=true, d_sigaction=define
useithreads=undef, usemultiplicity=undef
use64bitint=define, use64bitall=define, uselongdouble=undef
usemymalloc=n, bincompat5005=undef
Compiler:
cc='cc', ccflags ='-fwrapv -fno-strict-aliasing -pipe -fstack-protector-strong -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -D_FORTIFY_SOURCE=2',
optimize='-O2 -march=native -pipe',
cppflags='-fwrapv -fno-strict-aliasing -pipe -fstack-protector-strong -I/usr/local/include'
ccversion='', gccversion='4.9.2', gccosandvers=''
intsize=4, longsize=8, ptrsize=8, doublesize=8, byteorder=12345678, doublekind=3
d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16, longdblkind=3
ivtype='long', ivsize=8, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8
alignbytes=8, prototype=define