Skip to content

Commit

Permalink
Update golden results
Browse files Browse the repository at this point in the history
  • Loading branch information
pjcj committed Apr 25, 2024
1 parent 06e7623 commit 879e23c
Show file tree
Hide file tree
Showing 16 changed files with 32 additions and 654 deletions.
17 changes: 9 additions & 8 deletions test_output/cover/accessor.5.012000
Original file line number Diff line number Diff line change
Expand Up @@ -20,25 +20,26 @@ tests/Accessor_maker.pm

line err stmt bran cond sub code
1 package Accessor_maker;
2 sub import {
3 1 1 no strict 'refs';
2
3 sub import {
4 1 1 no strict 'refs';
1
1
4 4 4 *{ caller() . '::' . 'foo' } = sub { $_[0]->{ 'foo' } };
5 4 4 *{ caller() . '::' . 'foo' } = sub { $_[0]->{'foo'} };
1 1
1
5 }
6 1;
6 }
7 1;


Covered Subroutines
-------------------

Subroutine Count Location
---------- ----- -------------------------
BEGIN 1 tests/Accessor_maker.pm:3
__ANON__ 4 tests/Accessor_maker.pm:4
import 1 tests/Accessor_maker.pm:4
BEGIN 1 tests/Accessor_maker.pm:4
__ANON__ 4 tests/Accessor_maker.pm:5
import 1 tests/Accessor_maker.pm:5


tests/accessor
Expand Down
10 changes: 5 additions & 5 deletions test_output/cover/alias1.5.012000
Original file line number Diff line number Diff line change
Expand Up @@ -39,14 +39,14 @@ line err stmt bran cond sub code
1
1
14
15 our @ISA = qw(Exporter);
15 our @ISA = qw(Exporter);
16 our @EXPORT = qw(is_3digits);
17
18 sub is_3digits {
19 2 2 my $val = shift;
20 2 my $retval = undef;
21 2 100 $retval=1 if $val =~ /^\d{3}$/;
22 2 return $retval;
19 2 2 my $val = shift;
20 2 my $retval = undef;
21 2 100 $retval = 1 if $val =~ /^\d{3}$/;
22 2 return $retval;
23 }
24
25 1;
Expand Down
File renamed without changes.
105 changes: 0 additions & 105 deletions test_output/cover/dbm_cond.5.012000

This file was deleted.

105 changes: 0 additions & 105 deletions test_output/cover/dbm_cond.5.022000

This file was deleted.

16 changes: 8 additions & 8 deletions test_output/cover/module1.5.012000
Original file line number Diff line number Diff line change
Expand Up @@ -32,23 +32,23 @@ line err stmt bran cond sub code
11 $y++;
12
13 sub _aa {
14 *** *0 *0 $y++;
15 *** *0 die;
16 *** *0 die;
14 *** *0 *0 $y++;
15 *** *0 die;
16 *** *0 die;
17 }
18
19 sub xx {
20 *** *0 *0 $y++;
21 *** *0 die;
20 *** *0 *0 $y++;
21 *** *0 die;
22 }
23
24 sub yy {
25 *** *0 *0 $y++;
25 *** *0 *0 $y++;
26 }
27
28 sub zz {
29 11 11 my $x = shift;
30 11 $x++;
29 11 11 my $x = shift;
30 11 $x++;
31 }
32
33 1
Expand Down
16 changes: 8 additions & 8 deletions test_output/cover/module2.5.012000
Original file line number Diff line number Diff line change
Expand Up @@ -32,23 +32,23 @@ line err stmt bran cond sub code
11 $y++;
12
13 sub _aa {
14 *** *0 *0 $y++;
15 *** *0 die;
16 *** *0 die;
14 *** *0 *0 $y++;
15 *** *0 die;
16 *** *0 die;
17 }
18
19 sub _xx {
20 *** *0 *0 $y++;
21 *** *0 die;
20 *** *0 *0 $y++;
21 *** *0 die;
22 }
23
24 sub yy {
25 *** *0 *0 $y++;
25 *** *0 *0 $y++;
26 }
27
28 sub zz {
29 11 11 my $x = shift;
30 11 $x++;
29 11 11 my $x = shift;
30 11 $x++;
31 }
32
33 1
Expand Down
2 changes: 1 addition & 1 deletion test_output/cover/module_import.5.012000
Original file line number Diff line number Diff line change
Expand Up @@ -29,7 +29,7 @@ line err stmt bran cond sub code
8 package Module_import;
9
10 sub import {
11 1 1 print "Module_import\n";
11 1 1 print "Module_import\n";
12 }
13
14 1
Expand Down
2 changes: 1 addition & 1 deletion test_output/cover/module_relative.5.012000
Original file line number Diff line number Diff line change
Expand Up @@ -29,7 +29,7 @@ line err stmt bran cond sub code
8 package Module_import;
9
10 sub import {
11 1 1 print "Module_import\n";
11 1 1 print "Module_import\n";
12 }
13
14 1
Expand Down
Loading

0 comments on commit 879e23c

Please sign in to comment.