| line |
true |
false |
branch |
|
53
|
0 |
4 |
@_ == 1 ? : |
|
66
|
0 |
0 |
unless $$self{'debug'} |
|
89
|
0 |
0 |
unless defined $prompt |
|
94
|
0 |
0 |
if ($self->is_supported and -t STDIN) { } |
|
101
|
0 |
0 |
if defined $line |
|
115
|
0 |
0 |
unless defined $c |
|
116
|
0 |
0 |
unless $IS_WIN32 |
|
128
|
0 |
0 |
if ($$self{'isleadbyte'}->Call($c)) |
|
149
|
0 |
0 |
if ($$self{'sigint'}) { } |
|
|
0 |
0 |
elsif ($$self{'sigtstp'}) { } |
|
152
|
0 |
0 |
$IS_WIN32 ? : |
|
160
|
0 |
0 |
if ($IS_WIN32) |
|
180
|
0 |
4 |
if ($IS_WIN32) |
|
184
|
0 |
4 |
if (my $r = delete $$self{'rawmode'}) |
|
200
|
6 |
11 |
if (@{$$self{'history'};} + 1 > $self->history_max_len) |
|
220
|
0 |
0 |
unless (defined $c) |
|
223
|
0 |
0 |
unless my $cc = ord $c |
|
225
|
0 |
0 |
if ($cc == 9 and defined $$self{'completion_callback'}) |
|
227
|
0 |
0 |
unless defined $c |
|
229
|
0 |
0 |
if $cc == 0 |
|
232
|
0 |
0 |
if ($cc == 13) { } |
|
|
0 |
0 |
elsif ($cc == 3) { } |
|
|
0 |
0 |
elsif ($cc == 26) { } |
|
|
0 |
0 |
elsif ($cc == 127 or $cc == 8) { } |
|
|
0 |
0 |
elsif ($cc == 4) { } |
|
|
0 |
0 |
elsif ($cc == 20) { } |
|
|
0 |
0 |
elsif ($cc == 2) { } |
|
|
0 |
0 |
elsif ($cc == 6) { } |
|
|
0 |
0 |
elsif ($cc == 16) { } |
|
|
0 |
0 |
elsif ($cc == 14) { } |
|
|
0 |
0 |
elsif ($cc == 27) { } |
|
|
0 |
0 |
elsif ($cc == 21) { } |
|
|
0 |
0 |
elsif ($cc == 11) { } |
|
|
0 |
0 |
elsif ($cc == 1) { } |
|
|
0 |
0 |
elsif ($cc == 5) { } |
|
|
0 |
0 |
elsif ($cc == 12) { } |
|
|
0 |
0 |
elsif ($cc == 18) { } |
|
|
0 |
0 |
elsif ($cc == 23) { } |
|
244
|
0 |
0 |
if (length $state->buf > 0) { } |
|
251
|
0 |
0 |
if ($state->pos > 0 and $state->pos < $state->len) |
|
255
|
0 |
0 |
if ($state->pos != $state->len - 1) |
|
270
|
0 |
0 |
unless my $buf = $self->readkey |
|
271
|
0 |
0 |
unless $buf .= $self->readkey |
|
273
|
0 |
0 |
if ($buf eq '[D') { } |
|
|
0 |
0 |
elsif ($buf eq '[C') { } |
|
|
0 |
0 |
elsif ($buf eq '[A') { } |
|
|
0 |
0 |
elsif ($buf eq '[B') { } |
|
|
0 |
0 |
elsif ($buf eq '[1') { } |
|
|
0 |
0 |
elsif ($buf eq '[4') { } |
|
282
|
0 |
0 |
unless $buf = $self->readkey |
|
283
|
0 |
0 |
if ($buf eq '~') |
|
288
|
0 |
0 |
unless $buf = $self->readkey |
|
289
|
0 |
0 |
if ($buf eq '~') |
|
334
|
0 |
1 |
unless open my $fh, '<:encoding(utf-8)', $filename |
|
347
|
1 |
1 |
if $self->history_max_len == 0 |
|
349
|
0 |
1 |
unless open my $fh, '>:encoding(utf-8)', $filename |
|
352
|
0 |
3 |
unless $hist =~ /\S/ |
|
361
|
0 |
0 |
if ($status->len > 0 and $status->pos < $status->len) |
|
375
|
0 |
0 |
unless (defined $c) |
|
378
|
0 |
0 |
unless my $cc = ord $c |
|
380
|
0 |
0 |
if ($cc == 2 or $cc == 3 or $cc == 6 or $cc == 13) |
|
388
|
0 |
0 |
if ($cc == 127 or $cc == 8) { } |
|
400
|
0 |
0 |
if ((my $idx = index($hist, $query)) >= 0) |
|
416
|
0 |
0 |
unless (@ret) |
|
424
|
0 |
0 |
if ($i < @ret) { } |
|
434
|
0 |
0 |
unless (defined $c) |
|
437
|
0 |
0 |
unless my $cc = ord $c |
|
439
|
0 |
0 |
if ($cc == 9) { } |
|
|
0 |
0 |
elsif ($cc == 27) { } |
|
441
|
0 |
0 |
if ($i == @ret) |
|
446
|
0 |
0 |
if ($i < @ret) |
|
452
|
0 |
0 |
if ($i < @ret) |
|
485
|
0 |
0 |
if ($self->history_len > 1) |
|
487
|
0 |
0 |
$dir == $HISTORY_PREV ? : |
|
488
|
0 |
0 |
if ($$state{'history_index'} < 0) { } |
|
|
0 |
0 |
elsif ($$state{'history_index'} >= $self->history_len) { } |
|
503
|
0 |
0 |
if ($state->pos > 0 and length $state->buf > 0) |
|
517
|
0 |
0 |
if ($$self{'multi_line'}) { } |
|
532
|
0 |
0 |
if (defined $state->query) |
|
542
|
0 |
0 |
if ($rows > $state->maxrows) |
|
550
|
0 |
0 |
if ($old_rows - $rpos > 0) |
|
569
|
0 |
0 |
if (defined $state->query) |
|
575
|
0 |
0 |
if ($state->pos and $state->pos == $state->len and ($state->pos + $plen) % $state->cols == 0) |
|
580
|
0 |
0 |
if ($rows > $state->maxrows) |
|
589
|
0 |
0 |
if ($rows - $rpos2 > 0) |
|
601
|
0 |
0 |
if ($col > $state->cols) |
|
643
|
0 |
0 |
if ($state->pos != length $state->buf) |
|
651
|
0 |
0 |
if ($state->pos > 0) |
|
660
|
0 |
0 |
if (length $state->buf == $state->pos) { } |
|
671
|
0 |
0 |
if $IS_WIN32 |
|
673
|
0 |
0 |
unless defined $term |
|
674
|
0 |
0 |
if $term eq 'dumb' |
|
675
|
0 |
0 |
if $term eq 'cons25' |