Skip Menu |

This queue is for tickets about the Tickit CPAN distribution.

Report information
The Basics
Id: 102028
Status: resolved
Priority: 0/
Queue: Tickit

People
Owner: Nobody in particular
Requestors: ANNO [...] cpan.org
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: 0.51



Subject: Test fail with PERL_UNICODE=SDAL
When the environment variable PERL_UNICODE is set to "SDAL" test t/81tickit-input.t fails (see below). When the variable is unset the test passes. Cheers, Anno -- anno@radom clpm> export PERL_UNICODE=SDAL anno@radom clpm> prove -b t/81tickit-input.t t/81tickit-input.t .. 1/? # Failed test 'on_key UTF-8' # at t/81tickit-input.t line 66. # Structures begin differing at: # $got->[0][1] = 'Ä' # $expected->[0][1] = 'ĉ' # Looks like you failed 1 test of 4. t/81tickit-input.t .. Dubious, test returned 1 (wstat 256, 0x100) Failed 1/4 subtests Test Summary Report ------------------- t/81tickit-input.t (Wstat: 256 Tests: 4 Failed: 1) Failed test: 3 Non-zero exit status: 1 Files=1, Tests=4, 0 wallclock secs ( 0.04 usr 0.01 sys + 0.07 cusr 0.01 csys = 0.13 CPU) Result: FAIL anno@radom clpm> perl -V Summary of my perl5 (revision 5 version 20 subversion 1) configuration: Platform: osname=darwin, osvers=13.4.0, archname=darwin-multi-2level uname='darwin radom 13.4.0 darwin kernel version 13.4.0: sun aug 17 19:50:11 pdt 2014; root:xnu-2422.115.4~1release_x86_64 x86_64 ' config_args='-des -Duseshrplib -Dusemultiplicity' hint=recommended, useposix=true, d_sigaction=define useithreads=undef, usemultiplicity=define use64bitint=define, use64bitall=define, uselongdouble=undef usemymalloc=n, bincompat5005=undef Compiler: cc='cc', ccflags ='-fno-common -DPERL_DARWIN -fno-strict-aliasing -pipe -fstack-protector -I/usr/local/include -I/opt/local/include', optimize='-O3', cppflags='-fno-common -DPERL_DARWIN -fno-strict-aliasing -pipe -fstack-protector -I/usr/local/include -I/opt/local/include' ccversion='', gccversion='4.2.1 Compatible Apple LLVM 6.0 (clang-600.0.54)', gccosandvers='' intsize=4, longsize=8, ptrsize=8, doublesize=8, byteorder=12345678 d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16 ivtype='long', ivsize=8, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8 alignbytes=8, prototype=define Linker and Libraries: ld='env MACOSX_DEPLOYMENT_TARGET=10.3 cc', ldflags =' -fstack-protector -L/usr/local/lib -L/opt/local/lib' libpth=/usr/local/lib /Applications/Xcode.app/Contents/Developer/Toolchains/XcodeDefault.xctoolchain/usr/bin/../lib/clang/6.0/lib /Applications/Xcode.app/Contents/Developer/Toolchains/XcodeDefault.xctoolchain/usr/lib /usr/lib /opt/local/lib libs=-lgdbm -ldbm -ldl -lm -lutil -lc perllibs=-ldl -lm -lutil -lc libc=, so=dylib, useshrplib=true, libperl=libperl.dylib gnulibc_version='' Dynamic Linking: dlsrc=dl_dlopen.xs, dlext=bundle, d_dlsymun=undef, ccdlflags=' ' cccdlflags=' ', lddlflags=' -bundle -undefined dynamic_lookup -L/usr/local/lib -L/opt/local/lib -fstack-protector' Characteristics of this binary (from libperl): Compile-time options: HAS_TIMES MULTIPLICITY PERLIO_LAYERS PERL_DONT_CREATE_GVSV PERL_HASH_FUNC_ONE_AT_A_TIME_HARD PERL_IMPLICIT_CONTEXT PERL_MALLOC_WRAP PERL_NEW_COPY_ON_WRITE PERL_PRESERVE_IVUV USE_64_BIT_ALL USE_64_BIT_INT USE_LARGE_FILES USE_LOCALE USE_LOCALE_COLLATE USE_LOCALE_CTYPE USE_LOCALE_NUMERIC USE_PERLIO USE_PERL_ATOF Built under darwin Compiled at Oct 26 2014 00:26:15 %ENV: PERL5LIB="/Users/anno/lib/perl5" PERL5_CPANPLUS_IS_RUNNING="12119" PERL5_CPANPLUS_IS_VERSION="0.9148" PERLBREW_BASHRC_VERSION="0.42" PERLBREW_HOME="/Users/anno/.perlbrew" PERLBREW_MANPATH="" PERLBREW_PATH="/Users/anno/perl5/perlbrew/bin" PERLBREW_ROOT="/Users/anno/perl5/perlbrew" PERLBREW_VERSION="0.67" PERL_READLINE_NOWARN="1" PERL_UNICODE="SDAL" @INC: /Users/anno/lib/perl5 /usr/local/lib/perl5/site_perl/5.20.1/darwin-multi-2level /usr/local/lib/perl5/site_perl/5.20.1 /usr/local/lib/perl5/5.20.1/darwin-multi-2level /usr/local/lib/perl5/5.20.1 /usr/local/lib/perl5/site_perl/5.20.0/darwin-multi-2level /usr/local/lib/perl5/site_perl/5.20.0 /usr/local/lib/perl5/site_perl/5.18.2 /usr/local/lib/perl5/site_perl/5.18.1 /usr/local/lib/perl5/site_perl/5.18.0 /usr/local/lib/perl5/site_perl/5.16.1 /usr/local/lib/perl5/site_perl/5.16.0 /usr/local/lib/perl5/site_perl/5.14.2 /usr/local/lib/perl5/site_perl/5.14.0 /usr/local/lib/perl5/site_perl/5.12.3 /usr/local/lib/perl5/site_perl/5.12.1 /usr/local/lib/perl5/site_perl/5.12.0 /usr/local/lib/perl5/site_perl/5.10.1 /usr/local/lib/perl5/site_perl . anno@radom clpm>
Reproducable. -- Paul Evans
Turns out to be a bug in the test itself. Installed code is fine. -- Paul Evans
Subject: rt102028.patch
=== modified file 't/81tickit-input.t' --- t/81tickit-input.t 2014-09-08 10:24:07 +0000 +++ t/81tickit-input.t 2015-02-10 11:55:15 +0000 @@ -17,6 +17,8 @@ use Tickit; pipe my ( $term_rd, $my_wr ) or die "Cannot pipepair - $!"; +$my_wr->binmode( ":raw" ); + open my $term_wr, ">", \my $output; my $tickit = Tickit->new(
Released in 0.51 -- Paul Evans