Permalink
Browse files

Uncoverable test wasn't source of the warnings.

  • Loading branch information...
1 parent ec0ff7a commit f1251c0c4a96cee7d7ed5b05124f00c47f5921d0 @pjcj committed Mar 11, 2012
Showing with 74 additions and 83 deletions.
  1. +37 −40 test_output/cover/uncoverable.5.006001
  2. +37 −40 test_output/cover/uncoverable.5.012000
  3. +0 −3 tests/uncoverable
View
77 test_output/cover/uncoverable.5.006001
@@ -28,52 +28,49 @@ line err stmt bran cond sub code
7 # The latest version of this software should be available from my homepage:
8 # http://www.pjcj.net
9
-10 # __COVER__ skip_test $] == 5.015006
-11 # __COVER__ skip_reason B::Deparse throws warnings
-12
-13 # __COVER__ uncoverable_file tests/.uncoverable
+10 # __COVER__ uncoverable_file tests/.uncoverable
+11
+12 1 my $x = 1;
+13 1 my $y = 1;
14
-15 1 my $x = 1;
-16 1 my $y = 1;
-17
-18 # uncoverable branch true
-19 # uncoverable condition left
-20 # uncoverable condition false
-21 1 - 50 - 33 if ($x && !$y)
-22 {
-23 -0 $x++; # uncoverable statement
-24 # uncoverable statement
-25 -0 z();
-26 }
-27
-28 # uncoverable branch true
-29 # uncoverable condition left
-30 # uncoverable condition right
-31 1 - 50 - 33 if (!$x || !$y)
-32 {
-33 # uncoverable statement count:1
-34 # uncoverable statement count:2
-35 -0 b(); b();
+15 # uncoverable branch true
+16 # uncoverable condition left
+17 # uncoverable condition false
+18 1 - 50 - 33 if ($x && !$y)
+19 {
+20 -0 $x++; # uncoverable statement
+21 # uncoverable statement
+22 -0 z();
+23 }
+24
+25 # uncoverable branch true
+26 # uncoverable condition left
+27 # uncoverable condition right
+28 1 - 50 - 33 if (!$x || !$y)
+29 {
+30 # uncoverable statement count:1
+31 # uncoverable statement count:2
+32 -0 b(); b();
-0
-36 }
-37
-38 sub z
-39 {
-40 # uncoverable subroutine
-41 -0 -0 $y++; # uncoverable statement
-42 }
-43
-44 # uncoverable statement
-45 # uncoverable subroutine
+33 }
+34
+35 sub z
+36 {
+37 # uncoverable subroutine
+38 -0 -0 $y++; # uncoverable statement
+39 }
+40
+41 # uncoverable statement
+42 # uncoverable subroutine
Branches
--------
line err % true false branch
----- --- ------ ------ ------ ------
-21 - 50 -0 1 if ($x and not $y)
-31 - 50 -0 1 if (not $x or not $y)
+18 - 50 -0 1 if ($x and not $y)
+28 - 50 -0 1 if (not $x or not $y)
Conditions
@@ -83,20 +80,20 @@ and 3 conditions
line err % !l l&&!r l&&r expr
----- --- ------ ------ ------ ------ ----
-21 - 33 -0 1 -0 $x and not $y
+18 - 33 -0 1 -0 $x and not $y
or 3 conditions
line err % l !l&&r !l&&!r expr
----- --- ------ ------ ------ ------ ----
-31 - 33 -0 -0 1 not $x or not $y
+28 - 33 -0 -0 1 not $x or not $y
Uncovered Subroutines
---------------------
Subroutine Count Location
---------- ----- --------------------
-z -0 tests/uncoverable:41
+z -0 tests/uncoverable:38
View
77 test_output/cover/uncoverable.5.012000
@@ -28,52 +28,49 @@ line err stmt bran cond sub code
7 # The latest version of this software should be available from my homepage:
8 # http://www.pjcj.net
9
-10 # __COVER__ skip_test $] == 5.015006
-11 # __COVER__ skip_reason B::Deparse throws warnings
-12
-13 # __COVER__ uncoverable_file tests/.uncoverable
+10 # __COVER__ uncoverable_file tests/.uncoverable
+11
+12 1 my $x = 1;
+13 1 my $y = 1;
14
-15 1 my $x = 1;
-16 1 my $y = 1;
-17
-18 # uncoverable branch true
-19 # uncoverable condition left
-20 # uncoverable condition false
-21 1 - 50 - 33 if ($x && !$y)
-22 {
-23 -0 $x++; # uncoverable statement
-24 # uncoverable statement
-25 -0 z();
-26 }
-27
-28 # uncoverable branch true
-29 # uncoverable condition left
-30 # uncoverable condition right
-31 1 - 50 - 33 if (!$x || !$y)
-32 {
-33 # uncoverable statement count:1
-34 # uncoverable statement count:2
-35 -0 b(); b();
+15 # uncoverable branch true
+16 # uncoverable condition left
+17 # uncoverable condition false
+18 1 - 50 - 33 if ($x && !$y)
+19 {
+20 -0 $x++; # uncoverable statement
+21 # uncoverable statement
+22 -0 z();
+23 }
+24
+25 # uncoverable branch true
+26 # uncoverable condition left
+27 # uncoverable condition right
+28 1 - 50 - 33 if (!$x || !$y)
+29 {
+30 # uncoverable statement count:1
+31 # uncoverable statement count:2
+32 -0 b(); b();
-0
-36 }
-37
-38 sub z
-39 {
-40 # uncoverable subroutine
-41 -0 -0 $y++; # uncoverable statement
-42 }
-43
-44 # uncoverable statement
-45 # uncoverable subroutine
+33 }
+34
+35 sub z
+36 {
+37 # uncoverable subroutine
+38 -0 -0 $y++; # uncoverable statement
+39 }
+40
+41 # uncoverable statement
+42 # uncoverable subroutine
Branches
--------
line err % true false branch
----- --- ------ ------ ------ ------
-21 - 50 -0 1 if ($x and not $y)
-31 - 50 -0 1 unless ($x and $y)
+18 - 50 -0 1 if ($x and not $y)
+28 - 50 -0 1 unless ($x and $y)
Conditions
@@ -83,15 +80,15 @@ and 3 conditions
line err % !l l&&!r l&&r expr
----- --- ------ ------ ------ ------ ----
-21 - 33 -0 1 -0 $x and not $y
-31 - 33 -0 -0 1 $x and $y
+18 - 33 -0 1 -0 $x and not $y
+28 - 33 -0 -0 1 $x and $y
Uncovered Subroutines
---------------------
Subroutine Count Location
---------- ----- --------------------
-z -0 tests/uncoverable:41
+z -0 tests/uncoverable:38
View
3 tests/uncoverable
@@ -7,9 +7,6 @@
# The latest version of this software should be available from my homepage:
# http://www.pjcj.net
-# __COVER__ skip_test $] == 5.015006
-# __COVER__ skip_reason B::Deparse throws warnings
-
# __COVER__ uncoverable_file tests/.uncoverable
my $x = 1;

0 comments on commit f1251c0

Please sign in to comment.