line |
true |
false |
branch |
44
|
0 |
5 |
unless (defined $str) |
47
|
3 |
2 |
if ($str eq substr('>>graph6<<', 0, length $str)) { } |
|
0 |
2 |
elsif ($str eq substr('>>sparse6<<', 0, length $str)) { } |
|
0 |
2 |
elsif ($str eq substr('>>digraph6<<', 0, length $str)) { } |
48
|
0 |
3 |
if (length $str == 10) |
55
|
0 |
0 |
if (length $str == 11) |
62
|
0 |
0 |
if (length $str == 12) |
77
|
28 |
11 |
if (defined $options{'str'}) |
95
|
0 |
129 |
unless (defined $len) |
101
|
9 |
120 |
if ($skip_newlines and $str eq "\n") |
109
|
2 |
118 |
if ($allow_header and $str eq '>') |
111
|
2 |
0 |
if (defined $str) |
121
|
81 |
37 |
if ($n >= 0 and $n <= 63) |
125
|
8 |
29 |
if ($str eq '' or $str eq "\n") |
130
|
3 |
26 |
if ($initial and $str eq '&') |
136
|
19 |
7 |
if ($initial and $str eq ':') |
142
|
0 |
7 |
if ($str eq "\r") |
158
|
37 |
1 |
if ($n <= 62) |
162
|
1 |
0 |
if ($n < 0) |
167
|
0 |
0 |
if ($n <= 62) { } |
175
|
0 |
0 |
if ($n2 < 0) |
189
|
8 |
31 |
unless (defined $fh) |
190
|
8 |
0 |
if (defined(my $filename = $options{'filename'})) |
192
|
1 |
7 |
unless (open $fh, '<', $filename) |
202
|
13 |
25 |
if (my $format_func = $options{'format_func'}) |
205
|
0 |
38 |
if (my $format_ref = $options{'format_ref'}) |
209
|
11 |
27 |
if ($num_vertices < 0) |
212
|
18 |
9 |
if (my $num_vertices_func = $options{'num_vertices_func'}) |
215
|
8 |
19 |
if (my $num_vertices_ref = $options{'num_vertices_ref'}) |
221
|
7 |
20 |
if ($edge_aref) |
224
|
18 |
9 |
if ($format eq 'sparse6') { } |
237
|
29 |
42 |
if ($bits < 1) |
239
|
5 |
24 |
if ($n < 0) |
254
|
1 |
14 |
if ($n2 < 0) |
267
|
11 |
54 |
if ($x > $v) { } |
|
42 |
12 |
elsif ($v < $num_vertices) { } |
272
|
25 |
17 |
if ($edge_func) |
273
|
16 |
26 |
if ($edge_aref) |
285
|
22 |
45 |
if ($n & $mask) |
289
|
17 |
5 |
if ($edge_func) |
290
|
1 |
21 |
if ($edge_aref) |
294
|
8 |
1 |
if ($format eq 'graph6') { } |
300
|
0 |
10 |
if (($n = &$read_byte()) < 0) |
307
|
18 |
24 |
if ($from >= $to) |
309
|
6 |
12 |
unless $to < $num_vertices |
319
|
0 |
5 |
if (($n = &$read_byte()) < 0) |
326
|
5 |
20 |
if ($to >= $num_vertices) |
328
|
1 |
4 |
unless $from < $num_vertices |
339
|
0 |
10 |
unless (defined $len) |
343
|
1 |
9 |
if ($str eq "\r") |
346
|
9 |
0 |
if ($str eq '' or $str eq "\n") |
356
|
26 |
13 |
if (&$read()) |
359
|
11 |
2 |
if (defined $error) |
377
|
7 |
66 |
if ($n > 258047) { } |
|
1 |
65 |
elsif ($n > 62) { } |
405
|
44 |
20 |
if (not $fh and defined(my $str_ref = $options{'str_ref'})) |
411
|
2 |
62 |
if (not $fh and defined(my $filename = $options{'filename'})) |
414
|
0 |
2 |
unless open $fh, '>', $filename |
419
|
8 |
56 |
unless (defined $format) |
422
|
2 |
62 |
if (not defined $num_vertices and my $edge_aref = $options{'edge_aref'}) |
431
|
0 |
64 |
unless (defined $num_vertices) |
437
|
8 |
56 |
$options{'header'} ? : |
|
12 |
22 |
$format eq 'digraph6' ? : |
|
30 |
34 |
$format eq 'sparse6' ? : |
|
0 |
64 |
unless print $fh $options{'header'} ? ">>$format<<" : (), $format eq 'sparse6' ? ':' : ($format eq 'digraph6' ? '&' : ()), _number_to_string($num_vertices) |
449
|
545 |
109 |
if ($bitpos > 0) { } |
452
|
0 |
109 |
unless print $fh chr $word + 63 |
459
|
30 |
34 |
if ($format eq 'sparse6') { } |
462
|
27 |
3 |
if (my $edge_aref = $options{'edge_aref'}) |
465
|
3 |
52 |
$_->[0] > $_->[1] ? : |
470
|
0 |
23 |
unless $Graph::Graph6::a->[1] <=> $Graph::Graph6::b->[1] |
472
|
27 |
55 |
unless shift @edges |
476
|
1 |
29 |
if (not $edge_iterator and my $edge_predicate = $options{'edge_predicate'}) |
484
|
32 |
465 |
if ($from > $to) |
486
|
1 |
31 |
if ($to >= $num_vertices) |
491
|
1 |
495 |
if (&$edge_predicate($from, $to)) |
502
|
29 |
1 |
if ($num_vertices > 0) |
510
|
0 |
145 |
unless &$put_bit($n >> $i & 1) |
519
|
30 |
26 |
if ($to == $v + 1) { } |
521
|
0 |
30 |
unless &$put_bit(1) |
524
|
7 |
19 |
if ($to != $v) |
526
|
0 |
7 |
unless &$put_bit(1) and &$put_n($to) |
530
|
0 |
26 |
unless &$put_bit(0) |
533
|
0 |
56 |
unless &$put_n($from) |
538
|
22 |
8 |
if ($bitpos != 5) |
549
|
0 |
7 |
if ($width >= 1 and $width <= 4 and $num_vertices == 1 << $width and $bitpos >= $width and $v == $num_vertices - 2) |
554
|
0 |
0 |
unless &$put_bit(0) |
559
|
0 |
74 |
unless &$put_bit(1) |
566
|
7 |
27 |
if (not $edge_predicate and my $edge_aref = $options{'edge_aref'}) |
572
|
2 |
15 |
if ($from > $to and $format eq 'graph6') |
583
|
22 |
12 |
if ($format eq 'graph6') { } |
|
12 |
0 |
elsif ($format eq 'digraph6') { } |
586
|
33 |
59 |
&$edge_predicate($from, $to) ? : |
|
0 |
92 |
unless &$put_bit(&$edge_predicate($from, $to) ? 1 : 0) |
592
|
27 |
145 |
&$edge_predicate($from, $to) ? : |
|
0 |
172 |
unless &$put_bit(&$edge_predicate($from, $to) ? 1 : 0) |
600
|
0 |
108 |
unless &$put_bit(0) |
604
|
0 |
64 |
unless print $fh "\n" |