Skip to content

Instantly share code, notes, and snippets.

@kentfredric
Created August 22, 2013 07:49
Show Gist options
  • Save kentfredric/6304267 to your computer and use it in GitHub Desktop.
Save kentfredric/6304267 to your computer and use it in GitHub Desktop.
PERL_DL_NONLAZY=1 /home/kent/perl5/perlbrew/perls/perl-5.18.0/bin/perl "-MExtUtils::Command::MM" "-e" "test_harness(0, 'blib/lib', 'blib/arch')" t/*/*.t
t/internal/inc_filter.t ..... ok
t/e2e/adbm_cond.t ........... ok
t/regexp/regexp_eval.t ...... ok
t/e2e/aaccessor.t ........... ok
t/e2e/adefault_param.t ...... ok
t/internal/criteria.t ....... ok
t/e2e/aalias.t .............. ok
t/e2e/aalias1.t ............. ok
t/e2e/abranch_return_sub.t .. ok
t/e2e/abug_and.t ............ ok
t/e2e/acond_and.t ........... ok
t/e2e/acond_xor.t ........... ok
t/e2e/acond_chained.t ....... ok
t/e2e/abigint.t ............. ok
t/e2e/aeval_nested.t ........ ok
t/e2e/adestroy.t ............ ok
t/e2e/acop.t ................ ok
t/e2e/adeparse.t ............ ok
t/e2e/ainc_sub.t ............ ok
t/e2e/acond_or.t ............ ok
t/e2e/askip.t ............... ok
t/internal/subprocess.t ..... ok
===( 33;7 0/1 0/1 0/1 0/1 1/1 0/1 0/1 0/1 0/1 0/1... )===# Test 1 got:
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
| Elt|Got | Elt|Expected |
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
| 3|'- ------ ------ ------ ------ ------\n' | 3|'- ------ ------ ------ ------ ------\n' |
| 4|'File stmt bran cond sub total\n' | 4|'File stmt bran cond sub total\n' |
| 5|'- ------ ------ ------ ------ ------\n' | 5|'- ------ ------ ------ ------ ------\n' |
* 6|'tests/eval3 100.0 83.3 100.0 100.0 96.9\n' * 6|'tests/eval3 89.5 50.0 50.0 100.0 80.0\n' *
* 7|'Total 100.0 83.3 100.0 100.0 96.9\n' * 7|'Total 89.5 50.0 50.0 100.0 80.0\n' *
| 8|'- ------ ------ ------ ------ ------\n' | 8|'- ------ ------ ------ ------ ------\n' |
| 9|'\n' | 9|'\n' |
| 10|'\n' | 10|'\n' |
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
| 14|'Start: \n' | 14|'Start: \n' |
| 15|'Finish: \n' | 15|'Finish: \n' |
| 16|'\n' | 16|'\n' |
* 17|'Run: \n' * | |
* 18|'Perl version: \n' * | |
* 19|'OS: \n' * | |
* 20|'Start: \n' * | |
* 21|'Finish: \n' * | |
* 22|'\n' * | |
| 23|'tests/eval3\n' | 17|'tests/eval3\n' |
| 24|'\n' | 18|'\n' |
| 25|'line err stmt bran cond sub code\n' | 19|'line err stmt bran cond sub code\n' |
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
| 32|'7 # The latest version of this software should be available from my homepage:\n' | 26|'7 # The latest version of this software should be available from my homepage:\n' |
| 33|'8 # http://www.pjcj.net\n' | 27|'8 # http://www.pjcj.net\n' |
| 34|'9 \n' | 28|'9 \n' |
* 35|'10 2 2 use lib "tests";\n' * 29|'10 1 1 use lib "tests";\n' *
* 36|' 2 \n' * 30|' 1 \n' *
* 37|' 2 \n' * 31|' 1 \n' *
| 38|'11 \n' | 32|'11 \n' |
* 39|'12 2 100 $x = shift || 0;\n' * 33|'12 *** 1 50 $x = shift || 0;\n' *
* 40|'13 2 print "1 - $x\\n";\n' * 34|'13 1 print "1 - $x\\n";\n' *
* 41|'14 2 100 1 if ($x) { eval \'sub s1 { print "s1\\n" }\'; s1() }\n' * 35|'14 *** 1 50 if ($x) { eval \'sub s1 { print "s1\\n" }\'; s1() }\n' *
| | * 36|' *** 0 \n' *
| | * 37|' *** 0 \n' *
| | * 38|'15 1 print "3 - $x\\n";\n' *
| | * 39|'16 *** 1 50 1 if ($x < 4) { eval \'sub s2 { print "s2\\n" }\'; s2() }\n' *
| 42|' 1 \n' | 40|' 1 \n' |
| 43|' 1 \n' | 41|' 1 \n' |
| 44|' 1 \n' | 42|' 1 \n' |
* 45|'15 2 print "3 - $x\\n";\n' * 43|'17 1 print "4 - $x\\n";\n' *
* 46|'16 2 100 1 if ($x < 4) { eval \'sub s2 { print "s2\\n" }\'; s2() }\n' * 44|'18 *** 1 50 1 if ($x < 6) { eval \'sub s3 { print "s3\\n" }\'; s3() }\n' *
| 47|' 1 \n' | 45|' 1 \n' |
| 48|' 1 \n' | 46|' 1 \n' |
| 49|' 1 \n' | 47|' 1 \n' |
* 50|'17 2 print "4 - $x\\n";\n' * 48|'19 1 print "5 - $x\\n";\n' *
* 51|'18 *** 2 50 2 if ($x < 6) { eval \'sub s3 { print "s3\\n" }\'; s3() }\n' * | |
* 52|' 2 \n' * | |
* 53|' 2 \n' * | |
* 54|' 2 \n' * | |
* 55|'19 2 print "5 - $x\\n";\n' * | |
| 56|'\n' | 49|'\n' |
| 57|'\n' | 50|'\n' |
| 58|'Branches\n' | 51|'Branches\n' |
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
| 60|'\n' | 53|'\n' |
| 61|'line err % true false branch\n' | 54|'line err % true false branch\n' |
| 62|'- --- ------ ------ ------ ------\n' | 55|'- --- ------ ------ ------ ------\n' |
* 63|'14 100 1 1 if ($x)\n' * 56|'14 *** 50 0 1 if ($x)\n' *
* 64|'16 100 1 1 if ($x < 4)\n' * 57|'16 *** 50 1 0 if ($x < 4)\n' *
* 65|'18 *** 50 2 0 if ($x < 6)\n' * 58|'18 *** 50 1 0 if ($x < 6)\n' *
| 66|'\n' | 59|'\n' |
| 67|'\n' | 60|'\n' |
| 68|'Conditions\n' | 61|'Conditions\n' |
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
| 72|'\n' | 65|'\n' |
| 73|'line err % l !l expr\n' | 66|'line err % l !l expr\n' |
| 74|'- --- ------ ------ ------ ----\n' | 67|'- --- ------ ------ ------ ----\n' |
* 75|'12 100 1 1 shift @ARGV || 0\n' * 68|'12 *** 50 0 1 shift @ARGV || 0\n' *
| 76|'\n' | 69|'\n' |
| 77|'\n' | 70|'\n' |
| 78|'Covered Subroutines\n' | 71|'Covered Subroutines\n' |
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
| 80|'\n' | 73|'\n' |
| 81|'Subroutine Count Location \n' | 74|'Subroutine Count Location \n' |
| 82|'- ----- --------------\n' | 75|'- ----- --------------\n' |
* 83|'BEGIN 2 tests/eval3:10\n' * 76|'BEGIN 1 tests/eval3:10\n' *
* 84|'s1 1 tests/eval3:14\n' * | |
| 85|'s2 1 tests/eval3:16\n' | 77|'s2 1 tests/eval3:16\n' |
* 86|'s3 2 tests/eval3:18\n' * 78|'s3 1 tests/eval3:18\n' *
| 87|'\n' | 79|'\n' |
| 88|'\n' | 80|'\n' |
| | * 81|'' *
| | * 82|'' *
| | * 83|'' *
| | * 84|'' *
| | * 85|'' *
| | * 86|'' *
| | * 87|'' *
| | * 88|'' *
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
(/home/kent/.cpanm/work/1377157483.35568/Devel-Cover-1.07/blib/lib/Devel/Cover/Test.pm at line 334)
# Expected: No differences (output)
# /home/kent/.cpanm/work/1377157483.35568/Devel-Cover-1.07/blib/lib/Devel/Cover/Test.pm line 334 is: $self->{no_coverage} ? Test::ok 1 : eq_or_diff(\@at, \@ac, "output");
t/e2e/aeval3.t .............. Failed 1/1 subtests
t/e2e/aeval1.t .............. ok
t/e2e/adynamic_subs.t ....... ok
t/e2e/aif.t ................. ok
t/e2e/acond_branch.t ........ ok
t/e2e/aexec.t ............... ok
===( 39;8 1/1 0/1 0/1 0/1 0/1 0/1 0/1 0/1 0/1 0/1... )===# Test 1 got:
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
| Elt|Got | Elt|Expected |
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
| 14|'Start: \n' | 14|'Start: \n' |
| 15|'Finish: \n' | 15|'Finish: \n' |
| 16|'\n' | 16|'\n' |
* 17|'Run: \n' * | |
* 18|'Perl version: \n' * | |
* 19|'OS: \n' * | |
* 20|'Start: \n' * | |
* 21|'Finish: \n' * | |
* 22|'\n' * | |
| 23|'tests/eval2\n' | 17|'tests/eval2\n' |
| 24|'\n' | 18|'\n' |
| 25|'line err stmt bran cond sub code\n' | 19|'line err stmt bran cond sub code\n' |
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
| 32|'7 # The latest version of this software should be available from my homepage:\n' | 26|'7 # The latest version of this software should be available from my homepage:\n' |
| 33|'8 # http://www.pjcj.net\n' | 27|'8 # http://www.pjcj.net\n' |
| 34|'9 \n' | 28|'9 \n' |
* 35|'10 2 2 use lib "tests";\n' * 29|'10 1 1 use lib "tests";\n' *
* 36|' 2 \n' * 30|' 1 \n' *
* 37|' 2 \n' * 31|' 1 \n' *
| 38|'11 \n' | 32|'11 \n' |
* 39|'12 *** 2 50 $x = shift || 0;\n' * 33|'12 *** 1 50 $x = shift || 0;\n' *
* 40|'13 2 print "1 - $x\\n";\n' * 34|'13 1 print "1 - $x\\n";\n' *
* 41|'14 *** 2 50 if ($x) { eval \'use E2\' }\n' * 35|'14 *** 1 50 if ($x) { eval \'use E2\' }\n' *
| 42|' *** 0 \n' | 36|' *** 0 \n' |
* 43|'15 2 print "3 - $x\\n";\n' * 37|'15 1 print "3 - $x\\n";\n' *
* 44|'16 *** 2 50 2 if ($x < 4) { eval \'use E3\' }\n' * 38|'16 *** 1 50 1 if ($x < 4) { eval \'use E3\' }\n' *
* 45|' 2 \n' * 39|' 1 \n' *
* 46|' 2 \n' * 40|' 1 \n' *
* 47|' 2 \n' * 41|' 1 \n' *
* 48|' 2 \n' * 42|' 1 \n' *
* 49|'17 2 print "4 - $x\\n";\n' * 43|'17 1 print "4 - $x\\n";\n' *
* 50|'18 *** 2 50 2 if ($x < 6) { eval \'use E4\' }\n' * 44|'18 *** 1 50 1 if ($x < 6) { eval \'use E4\' }\n' *
* 51|' 2 \n' * 45|' 1 \n' *
* 52|' 2 \n' * 46|' 1 \n' *
* 53|' 2 \n' * 47|' 1 \n' *
* 54|' 2 \n' * 48|' 1 \n' *
* 55|'19 2 print "5 - $x\\n";\n' * 49|'19 1 print "5 - $x\\n";\n' *
| 56|'\n' | 50|'\n' |
| 57|'\n' | 51|'\n' |
| 58|'Branches\n' | 52|'Branches\n' |
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
| 60|'\n' | 54|'\n' |
| 61|'line err % true false branch\n' | 55|'line err % true false branch\n' |
| 62|'- --- ------ ------ ------ ------\n' | 56|'- --- ------ ------ ------ ------\n' |
* 63|'14 *** 50 0 2 if ($x)\n' * 57|'14 *** 50 0 1 if ($x)\n' *
* 64|'16 *** 50 2 0 if ($x < 4)\n' * 58|'16 *** 50 1 0 if ($x < 4)\n' *
* 65|'18 *** 50 2 0 if ($x < 6)\n' * 59|'18 *** 50 1 0 if ($x < 6)\n' *
| 66|'\n' | 60|'\n' |
| 67|'\n' | 61|'\n' |
| 68|'Conditions\n' | 62|'Conditions\n' |
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
| 72|'\n' | 66|'\n' |
| 73|'line err % l !l expr\n' | 67|'line err % l !l expr\n' |
| 74|'- --- ------ ------ ------ ----\n' | 68|'- --- ------ ------ ------ ----\n' |
* 75|'12 *** 50 0 2 shift @ARGV || 0\n' * 69|'12 *** 50 0 1 shift @ARGV || 0\n' *
| 76|'\n' | 70|'\n' |
| 77|'\n' | 71|'\n' |
| 78|'Covered Subroutines\n' | 72|'Covered Subroutines\n' |
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
| 80|'\n' | 74|'\n' |
| 81|'Subroutine Count Location \n' | 75|'Subroutine Count Location \n' |
| 82|'- ----- --------------\n' | 76|'- ----- --------------\n' |
* 83|'BEGIN 2 tests/eval2:10\n' * 77|'BEGIN 1 tests/eval2:10\n' *
* 84|'BEGIN 2 tests/eval2:16\n' * 78|'BEGIN 1 tests/eval2:16\n' *
* 85|'BEGIN 2 tests/eval2:18\n' * 79|'BEGIN 1 tests/eval2:18\n' *
| 86|'\n' | 80|'\n' |
| 87|'\n' | 81|'\n' |
| | * 82|'' *
| | * 83|'' *
| | * 84|'' *
| | * 85|'' *
| | * 86|'' *
| | * 87|'' *
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
(/home/kent/.cpanm/work/1377157483.35568/Devel-Cover-1.07/blib/lib/Devel/Cover/Test.pm at line 334)
# Expected: No differences (output)
# /home/kent/.cpanm/work/1377157483.35568/Devel-Cover-1.07/blib/lib/Devel/Cover/Test.pm line 334 is: $self->{no_coverage} ? Test::ok 1 : eq_or_diff(\@at, \@ac, "output");
t/e2e/aeval2.t .............. Failed 1/1 subtests
t/e2e/amodule_import.t ...... ok
t/e2e/amodule_ignore.t ...... ok
t/e2e/aexec_die.t ........... ok
t/e2e/amodule_relative.t .... ok
t/e2e/aspecial_blocks.t ..... ok
t/e2e/amodule1.t ............ ok
t/e2e/areadonly.t ........... ok
t/e2e/amodule2.t ............ ok
t/e2e/afork.t ............... ok
t/e2e/at1.t ................. ok
t/e2e/arequire.t ............ ok
t/e2e/aoverload_bool.t ...... ok
t/e2e/amoo_cond.t ........... ok
t/e2e/apadrange.t ........... ok
t/e2e/aoverloaded.t ......... ok
t/e2e/at2.t ................. ok
t/internal/launch.t ......... ok
t/e2e/aredefine_sub.t ....... ok
t/e2e/ataint.t .............. ok
t/e2e/asort.t ............... ok
t/e2e/astatement.t .......... ok
t/e2e/at0.t ................. ok
t/e2e/apod.t ................ ok
t/e2e/asubs_only.t .......... ok
t/e2e/atrivial.t ............ ok
t/e2e/auncoverable.t ........ ok
t/e2e/apod_nocp.t ........... ok
t/e2e/axor_constant_fold.t .. ok
t/e2e/md5.t ................. ok
t/e2e/change.t .............. ok
t/e2e/amoose_constraint.t ... ok
t/e2e/amoose_basic.t ........ ok
t/e2e/amoose_cond.t ......... ok
===( 77;10 0/1 1/1 )=============================================# Test 1 got:
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
| Elt|Got | Elt|Expected |
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
| 20|'7 # The latest version of this software should be available from my homepage:\n' | 20|'7 # The latest version of this software should be available from my homepage:\n' |
| 21|'8 # http://www.pjcj.net\n' | 21|'8 # http://www.pjcj.net\n' |
| 22|'9 \n' | 22|'9 \n' |
* 23|'10 5 5 use lib "tests";\n' * 23|'10 4 4 use lib "tests";\n' *
* 24|' 5 \n' * 24|' 4 \n' *
* 25|' 5 \n' * 25|' 4 \n' *
| 26|'11 \n' | 26|'11 \n' |
* 27|'12 5 100 $x = shift || 0;\n' * 27|'12 4 100 $x = shift || 0;\n' *
* 28|'13 5 print "1 - $x\\n";\n' * 28|'13 4 print "1 - $x\\n";\n' *
* 29|'14 5 100 2 if ($x) { eval \'use E2\' }\n' * 29|'14 4 100 2 if ($x) { eval \'use E2\' }\n' *
| 30|' 2 \n' | 30|' 2 \n' |
| 31|' 2 \n' | 31|' 2 \n' |
| 32|' 2 \n' | 32|' 2 \n' |
| 33|' 2 \n' | 33|' 2 \n' |
* 34|'15 5 print "3 - $x\\n";\n' * 34|'15 4 print "3 - $x\\n";\n' *
* 35|'16 5 100 3 if ($x < 4) { eval \'use E3\' }\n' * 35|'16 4 100 2 if ($x < 4) { eval \'use E3\' }\n' *
| | * 36|' 2 \n' *
| | * 37|' 2 \n' *
| | * 38|' 2 \n' *
| | * 39|' 2 \n' *
| | * 40|'17 4 print "4 - $x\\n";\n' *
| | * 41|'18 4 100 3 if ($x < 6) { eval \'use E4\' }\n' *
| 36|' 3 \n' | 42|' 3 \n' |
| 37|' 3 \n' | 43|' 3 \n' |
| 38|' 3 \n' | 44|' 3 \n' |
| 39|' 3 \n' | 45|' 3 \n' |
* 40|'17 5 print "4 - $x\\n";\n' * 46|'19 4 print "5 - $x\\n";\n' *
* 41|'18 5 100 4 if ($x < 6) { eval \'use E4\' }\n' * | |
* 42|' 4 \n' * | |
* 43|' 4 \n' * | |
* 44|' 4 \n' * | |
* 45|' 4 \n' * | |
* 46|'19 5 print "5 - $x\\n";\n' * | |
| 47|'\n' | 47|'\n' |
| 48|'\n' | 48|'\n' |
| 49|'Branches\n' | 49|'Branches\n' |
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
| 51|'\n' | 51|'\n' |
| 52|'line err % true false branch\n' | 52|'line err % true false branch\n' |
| 53|'- --- ------ ------ ------ ------\n' | 53|'- --- ------ ------ ------ ------\n' |
* 54|'14 100 2 3 if ($x)\n' * 54|'14 100 2 2 if ($x)\n' *
* 55|'16 100 3 2 if ($x < 4)\n' * 55|'16 100 2 2 if ($x < 4)\n' *
* 56|'18 100 4 1 if ($x < 6)\n' * 56|'18 100 3 1 if ($x < 6)\n' *
| 57|'\n' | 57|'\n' |
| 58|'\n' | 58|'\n' |
| 59|'Conditions\n' | 59|'Conditions\n' |
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
| 63|'\n' | 63|'\n' |
| 64|'line err % l !l expr\n' | 64|'line err % l !l expr\n' |
| 65|'- --- ------ ------ ------ ----\n' | 65|'- --- ------ ------ ------ ----\n' |
* 66|'12 100 2 3 shift @ARGV || 0\n' * 66|'12 100 2 2 shift @ARGV || 0\n' *
| 67|'\n' | 67|'\n' |
| 68|'\n' | 68|'\n' |
| 69|'Covered Subroutines\n' | 69|'Covered Subroutines\n' |
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
| 71|'\n' | 71|'\n' |
| 72|'Subroutine Count Location \n' | 72|'Subroutine Count Location \n' |
| 73|'- ----- --------------\n' | 73|'- ----- --------------\n' |
* 74|'BEGIN 5 tests/eval2:10\n' * 74|'BEGIN 4 tests/eval2:10\n' *
| 75|'BEGIN 2 tests/eval2:14\n' | 75|'BEGIN 2 tests/eval2:14\n' |
* 76|'BEGIN 3 tests/eval2:16\n' * 76|'BEGIN 2 tests/eval2:16\n' *
* 77|'BEGIN 4 tests/eval2:18\n' * 77|'BEGIN 3 tests/eval2:18\n' *
| 78|'\n' | 78|'\n' |
| 79|'\n' | 79|'\n' |
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
(/home/kent/.cpanm/work/1377157483.35568/Devel-Cover-1.07/blib/lib/Devel/Cover/Test.pm at line 334)
# Expected: No differences (output)
# /home/kent/.cpanm/work/1377157483.35568/Devel-Cover-1.07/blib/lib/Devel/Cover/Test.pm line 334 is: $self->{no_coverage} ? Test::ok 1 : eq_or_diff(\@at, \@ac, "output");
t/e2e/eval_use.t ............ Failed 1/1 subtests
t/e2e/eval_sub.t ............ 1/1 # Test 1 got:
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
| Elt|Got | Elt|Expected |
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
| 20|'7 # The latest version of this software should be available from my homepage:\n' | 20|'7 # The latest version of this software should be available from my homepage:\n' |
| 21|'8 # http://www.pjcj.net\n' | 21|'8 # http://www.pjcj.net\n' |
| 22|'9 \n' | 22|'9 \n' |
* 23|'10 5 5 use lib "tests";\n' * 23|'10 4 4 use lib "tests";\n' *
* 24|' 5 \n' * 24|' 4 \n' *
* 25|' 5 \n' * 25|' 4 \n' *
| 26|'11 \n' | 26|'11 \n' |
* 27|'12 5 100 $x = shift || 0;\n' * 27|'12 4 100 $x = shift || 0;\n' *
* 28|'13 5 print "1 - $x\\n";\n' * 28|'13 4 print "1 - $x\\n";\n' *
* 29|'14 5 100 3 if ($x) { eval \'sub s1 { print "s1\\n" }\'; s1() }\n' * 29|'14 4 100 3 if ($x) { eval \'sub s1 { print "s1\\n" }\'; s1() }\n' *
| 30|' 3 \n' | 30|' 3 \n' |
| 31|' 3 \n' | 31|' 3 \n' |
| 32|' 3 \n' | 32|' 3 \n' |
* 33|'15 5 print "3 - $x\\n";\n' * 33|'15 4 print "3 - $x\\n";\n' *
* 34|'16 5 100 2 if ($x < 4) { eval \'sub s2 { print "s2\\n" }\'; s2() }\n' * 34|'16 4 100 if ($x < 4) { eval \'sub s2 { print "s2\\n" }\'; s2() }\n' *
* 35|' 2 \n' * 35|' 1 \n' *
* 36|' 2 \n' * 36|' 1 \n' *
* 37|' 2 \n' * 37|'17 4 print "4 - $x\\n";\n' *
* 38|'17 5 print "4 - $x\\n";\n' * 38|'18 4 100 4 if ($x < 6) { eval \'sub s3 { print "s3\\n" }\'; s3() }\n' *
* 39|'18 5 100 4 if ($x < 6) { eval \'sub s3 { print "s3\\n" }\'; s3() }\n' * 39|' 3 \n' *
| | * 40|' 3 \n' *
| 40|' 4 \n' | 41|' 4 \n' |
* 41|' 4 \n' * 42|'19 4 print "5 - $x\\n";\n' *
* 42|' 4 \n' * | |
* 43|'19 5 print "5 - $x\\n";\n' * | |
| 44|'\n' | 43|'\n' |
| 45|'\n' | 44|'\n' |
| 46|'Branches\n' | 45|'Branches\n' |
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
| 48|'\n' | 47|'\n' |
| 49|'line err % true false branch\n' | 48|'line err % true false branch\n' |
| 50|'- --- ------ ------ ------ ------\n' | 49|'- --- ------ ------ ------ ------\n' |
* 51|'14 100 3 2 if ($x)\n' * 50|'14 100 3 1 if ($x)\n' *
* 52|'16 100 2 3 if ($x < 4)\n' * 51|'16 100 1 3 if ($x < 4)\n' *
* 53|'18 100 4 1 if ($x < 6)\n' * 52|'18 100 3 1 if ($x < 6)\n' *
| 54|'\n' | 53|'\n' |
| 55|'\n' | 54|'\n' |
| 56|'Conditions\n' | 55|'Conditions\n' |
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
| 60|'\n' | 59|'\n' |
| 61|'line err % l !l expr\n' | 60|'line err % l !l expr\n' |
| 62|'- --- ------ ------ ------ ----\n' | 61|'- --- ------ ------ ------ ----\n' |
* 63|'12 100 3 2 shift @ARGV || 0\n' * 62|'12 100 3 1 shift @ARGV || 0\n' *
| 64|'\n' | 63|'\n' |
| 65|'\n' | 64|'\n' |
| 66|'Covered Subroutines\n' | 65|'Covered Subroutines\n' |
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
| 68|'\n' | 67|'\n' |
| 69|'Subroutine Count Location \n' | 68|'Subroutine Count Location \n' |
| 70|'- ----- --------------\n' | 69|'- ----- --------------\n' |
* 71|'BEGIN 5 tests/eval3:10\n' * 70|'BEGIN 4 tests/eval3:10\n' *
| 72|'s1 3 tests/eval3:14\n' | 71|'s1 3 tests/eval3:14\n' |
* 73|'s2 2 tests/eval3:16\n' * | |
| 74|'s3 4 tests/eval3:18\n' | 72|'s3 4 tests/eval3:18\n' |
| 75|'\n' | 73|'\n' |
| 76|'\n' | 74|'\n' |
| | * 75|'' *
| | * 76|'' *
+----+-------------------------------------------------------------------------------------------------------------------------+----+-------------------------------------------------------------------------------------------------------------------------+
(/home/kent/.cpanm/work/1377157483.35568/Devel-Cover-1.07/blib/lib/Devel/Cover/Test.pm at line 334)
# Expected: No differences (output)
# /home/kent/.cpanm/work/1377157483.35568/Devel-Cover-1.07/blib/lib/Devel/Cover/Test.pm line 334 is: $self->{no_coverage} ? Test::ok 1 : eq_or_diff(\@at, \@ac, "output");
t/e2e/eval_sub.t ............ Failed 1/1 subtests
Test Summary Report
-------------------
t/e2e/aeval3.t (Wstat: 0 Tests: 1 Failed: 1)
Failed test: 1
t/e2e/aeval2.t (Wstat: 0 Tests: 1 Failed: 1)
Failed test: 1
t/e2e/eval_use.t (Wstat: 0 Tests: 1 Failed: 1)
Failed test: 1
t/e2e/eval_sub.t (Wstat: 0 Tests: 1 Failed: 1)
Failed test: 1
Files=64, Tests=78, 14 wallclock secs ( 0.37 usr 0.12 sys + 39.92 cusr 11.38 csys = 51.79 CPU)
Result: FAIL
Failed 4/64 test programs. 4/78 subtests failed.
make: *** [test_dynamic] Error 255
Testing Devel-Cover-1.07 failed.
You can s)kip, r)etry, f)orce install, e)xamine build log, or l)ook ? [s]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment