Skip Menu |
 

Preferred bug tracker

Please visit the preferred bug tracker to report your issue.

This queue is for tickets about the Devel-Cover CPAN distribution.

Report information
The Basics
Id: 38765
Status: resolved
Priority: 0/
Queue: Devel-Cover

People
Owner: Nobody in particular
Requestors: johntrammell [...] gmail.com
Cc:
AdminCc:

Bug Information
Severity: Important
Broken in: 0.64
Fixed in: (no value)



Subject: 1 test fails (acond_branch.t) on Cygwin 1.5.25 / Perl 5.10
"make test" fails on cygwin 1.5.25. See attached screenshots.
Subject: devel-cover-acond-branch-fail.txt
% prove -b -v t/acond_branch.t t/acond_branch...... 1..1 # Running under perl version 5.010000 for cygwin # Current time local: Wed Aug 27 12:55:40 2008 # Current time GMT: Wed Aug 27 17:55:40 2008 # Using Test.pm version 1.25 not ok 1 # Test 1 got: +----+--------------------------------------------------------+----+----------------------------------------------------------------+ | Elt|Got | Elt|Expected | +----+--------------------------------------------------------+----+----------------------------------------------------------------+ | 386|48 *** 50 0 4 $y ? : | 386|48 *** 50 0 4 $y ? : | | 387|49 100 2 2 $z ? : | 387|49 100 2 2 $z ? : | | 388|51 *** 50 0 4 if ($y) { } | 388|51 *** 50 0 4 if ($y) { } | * 389| *** 50 0 4 elsif (do { * 389| *** 50 0 4 elsif ($y and $z) { } * * 390|\t$z if $y * 390| 100 2 2 elsif ($y or $z) { } * * 391|}) { } * | | * 392| 100 2 2 elsif (do { * | | * 393| $z unless $y * | | * 394|}) { } * | | | 395|68 *** 50 0 4 if $y and $z | 391|68 *** 50 0 4 if $y and $z | | 396| *** 50 0 4 if $y and $z | 392| *** 50 0 4 if $y and $z | | 397|74 100 1 1 unless $y | 393|74 100 1 1 unless $y | +----+--------------------------------------------------------+----+----------------------------------------------------------------+ | 419|253 100 2 2 unless shift @_ | 415|253 100 2 2 unless shift @_ | | 420|269 100 2 2 if shift @_ | 416|269 100 2 2 if shift @_ | | 421|302 *** 50 0 1 if ($a and $b) { } | 417|302 *** 50 0 1 if ($a and $b) { } | * 422| *** 50 0 1 elsif (do { * 418| *** 50 0 1 elsif (not $a and not $b) { } * * 423|\tnot $b if not $a * 419| *** 50 1 0 elsif ($b or 0) { } * * 424|}) { } * | | * 425| *** 50 1 0 elsif (do { * | | * 426| 0 unless $b * | | * 427|}) { } * | | | 428|313 *** 50 0 1 if (not $b or $a) { } | 420|313 *** 50 0 1 if (not $b or $a) { } | * 429| *** 50 1 0 elsif (do { * 421| *** 50 1 0 elsif (not $a and $b) { } * * 430| $b if not $a * | | * 431|}) { } * | | | 432| | 422| | | 433| | 423| | | 434|Conditions | 424|Conditions | +----+--------------------------------------------------------+----+----------------------------------------------------------------+ | 496|__ANON__ 4 tests/cond_branch:286 | 486|__ANON__ 4 tests/cond_branch:286 | | 497| | 487| | | 498| | 488| | | | * 489| * | | * 490| * | | * 491| * | | * 492| * | | * 493| * | | * 494| * | | * 495| * | | * 496| * | | * 497| * | | * 498| * +----+--------------------------------------------------------+----+----------------------------------------------------------------+ (/home/johnt/Devel-Cover-0.64/blib/lib/Devel/Cover/Test.pm at line 301) # Expected: No differences (output) # /home/johnt/Devel-Cover-0.64/blib/lib/Devel/Cover/Test.pm line 301 is: $ENV{DEVEL_COVER_NO_COVERAGE} ? ok 1 : eq_or_diff(\@at, \@ac, "output"); Failed 1/1 subtests Test Summary Report ------------------- t/acond_branch.t (Wstat: 0 Tests: 1 Failed: 1) Failed test: 1 Files=1, Tests=1, 5 wallclock secs ( 0.00 usr 0.00 sys + 4.18 cusr 0.54 csys = 4.73 CPU) Result: FAIL
Subject: perl-V.txt
Download perl-V.txt
text/plain 2.8k
% perl -V Summary of my perl5 (revision 5 version 10 subversion 0 patch 34065) configuration: Platform: osname=cygwin, osvers=1.5.25(0.15642), archname=cygwin-thread-multi-64int uname='cygwin_nt-5.1 reini 1.5.25(0.15642) 2008-06-12 19:34 i686 cygwin ' config_args='-de -Dmksymlinks -Dusethreads -Dmad=y -Dusedevel' hint=recommended, useposix=true, d_sigaction=define useithreads=define, usemultiplicity=define useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef use64bitint=define, use64bitall=undef, uselongdouble=undef usemymalloc=y, bincompat5005=undef Compiler: cc='gcc', ccflags ='-DPERL_USE_SAFE_PUTENV -U__STRICT_ANSI__ -fno-strict-aliasing -pipe -I/usr/local/include', optimize='-O3', cppflags='-DPERL_USE_SAFE_PUTENV -U__STRICT_ANSI__ -fno-strict-aliasing -pipe -I/usr/local/include' ccversion='', gccversion='3.4.4 (cygming special, gdc 0.12, using dmd 0.125)', gccosandvers='' intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=12345678 d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12 ivtype='long long', ivsize=8, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8 alignbytes=8, prototype=define Linker and Libraries: ld='g++', ldflags =' -Wl,--enable-auto-import -Wl,--export-all-symbols -Wl,--stack,8388608 -Wl,--enable-auto-image-base -L/usr/local/lib' libpth=/usr/local/lib /usr/lib /lib libs=-lgdbm -ldb -ldl -lcrypt -lgdbm_compat perllibs=-ldl -lcrypt libc=/usr/lib/libc.a, so=dll, useshrplib=true, libperl=libperl.a gnulibc_version='' Dynamic Linking: dlsrc=dl_dlopen.xs, dlext=dll, d_dlsymun=undef, ccdlflags=' ' cccdlflags=' ', lddlflags=' --shared -Wl,--enable-auto-import -Wl,--export-all-symbols -Wl,--stack,8388608 -Wl,--enable-auto-image-base -L/usr/local/lib' Characteristics of this binary (from libperl): Compile-time options: MULTIPLICITY MYMALLOC PERL_DONT_CREATE_GVSV PERL_IMPLICIT_CONTEXT PERL_MAD PERL_MALLOC_WRAP PERL_USE_SAFE_PUTENV USE_64_BIT_INT USE_ITHREADS USE_LARGE_FILES USE_PERLIO USE_REENTRANT_API Locally applied patches: MAINT34065 CYG11 no-bs CYG12 no archlib in otherlibdirs CYG14 Dynaloader CYG15 static-Win32CORE Bug#55162 File::Spec::case_tolerant performance Built under cygwin Compiled at Jun 30 2008 16:05:15 %ENV: CYGWIN="notty" @INC: /usr/lib/perl5/5.10/i686-cygwin /usr/lib/perl5/5.10 /usr/lib/perl5/site_perl/5.10/i686-cygwin /usr/lib/perl5/site_perl/5.10 /usr/lib/perl5/vendor_perl/5.10/i686-cygwin /usr/lib/perl5/vendor_perl/5.10 /usr/lib/perl5/vendor_perl/5.10 /usr/lib/perl5/site_perl/5.8 /usr/lib/perl5/vendor_perl/5.8 . %
Download (untitled) / with headers
text/plain 383b
Thanks very much for this report. The problem was caused by changes to B::Deparse, but I didn't think they had ever made it into an official perl release. Perhaps it was due to one of the patches cygwin added? In any case, I believe the problem is now fixed, so I'm closing this ticket. But if that turns out not to be the case, please feel ffree to reopen it. Thanks again,


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.