| line |
true |
false |
branch |
|
350
|
0 |
2 |
if ($DEBUG) |
|
385
|
0 |
2 |
if ($$self{'redirector'} and $$self{'shell_output_director'}) |
|
388
|
0 |
2 |
if ($$self{'redirector'}) { } |
|
|
0 |
2 |
elsif ($$self{'shell_output_director'}) { } |
|
406
|
2 |
0 |
unless ($$self{'emacs_version'}) |
|
411
|
0 |
0 |
unless defined $$self{'load_emacs_init'} |
|
412
|
0 |
0 |
unless defined $$self{'load_site_init'} |
|
413
|
0 |
0 |
unless defined $$self{'load_default_init'} |
|
415
|
0 |
0 |
if ($$self{'load_no_inits'}) |
|
422
|
0 |
0 |
if ($$self{'load_no_inits'}) |
|
431
|
0 |
0 |
if (defined(my $emacs_libs = $$self{'emacs_libs'})) { } |
|
493
|
0 |
0 |
if (ref $arg2 eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (ref $arg2 eq 'HASH') { } |
|
508
|
0 |
0 |
if ($passthru) { } |
|
606
|
0 |
0 |
if ($self->emacs_type eq 'XEmacs') |
|
621
|
0 |
0 |
if ($retval =~ / Unknown \s+ option \s+ .*? --no-splash /msx) { } |
|
740
|
0 |
0 |
if ($self->emacs_major_version eq '21' and $self->emacs_type eq 'GNU Emacs' and $self->probe_for_option_no_splash) |
|
862
|
0 |
0 |
unless ($output_file) |
|
873
|
0 |
0 |
if -e $output_file |
|
879
|
0 |
0 |
if ($self->emacs_major_version eq '21' and $self->emacs_type eq 'GNU Emacs' and $self->probe_for_option_no_splash) |
|
885
|
0 |
0 |
$message_log ? : |
|
894
|
0 |
0 |
if $DEBUG |
|
901
|
0 |
0 |
if $DEBUG |
|
907
|
0 |
0 |
if $before_hook |
|
910
|
0 |
0 |
if $lib |
|
913
|
0 |
0 |
if $elisp_initialize |
|
917
|
0 |
0 |
if ($message_log) |
|
927
|
0 |
0 |
if (my $pid = fork) { } |
|
929
|
0 |
0 |
if $DEBUG |
|
933
|
0 |
0 |
if ($self->full_emacs_done({'output_file', $output_file, 'pid', $pid})) |
|
938
|
0 |
0 |
if $DEBUG |
|
944
|
0 |
0 |
unless defined $pid |
|
946
|
0 |
0 |
if $DEBUG |
|
950
|
0 |
0 |
unless open my $fh, '<', $output_file |
|
978
|
0 |
0 |
if (-e $output_file and -s $output_file > $cutoff) { } |
|
1034
|
0 |
0 |
if $elisp |
|
1087
|
0 |
0 |
if (/\s/ and $prev =~ /\s/) |
|
1090
|
0 |
0 |
if (not $quoted and /"/) { } |
|
|
0 |
0 |
elsif ($quoted and /"/ and $prev ne '\\') { } |
|
|
0 |
0 |
elsif ($quoted) { } |
|
|
0 |
0 |
elsif (not $opted and /[-+]/ and $prev ne '\\') { } |
|
|
0 |
0 |
elsif ($opted and /[\s=]/) { } |
|
|
0 |
0 |
elsif ($opted) { } |
|
|
0 |
0 |
elsif (not $arged and $prev =~ /\s/ || $prev eq '=') { } |
|
|
0 |
0 |
elsif ($arged and /\s/) { } |
|
|
0 |
0 |
elsif ($arged) { } |
|
1097
|
0 |
0 |
if ($_ eq '\\' and $prev eq '\\') |
|
1101
|
0 |
0 |
if ($_ eq '"' and $prev eq '\\') |
|
1124
|
0 |
0 |
unless $part =~ /^\s*$/ |
|
1163
|
0 |
2 |
unless ($redirector) |
|
1168
|
2 |
0 |
if ($redirector eq 'stdout_only') { } |
|
|
0 |
0 |
elsif ($redirector eq 'stderr_only') { } |
|
|
0 |
0 |
elsif ($redirector eq 'all_output') { } |
|
1278
|
0 |
0 |
unless ($type) |
|
1282
|
0 |
0 |
unless ($priority) |
|
1323
|
0 |
0 |
if ($load_no_inits) |
|
1331
|
0 |
0 |
if ($load_site_init and $self->detect_site_init) |
|
1336
|
0 |
0 |
if ($load_emacs_init) |
|
1338
|
0 |
0 |
if ($dot_emacs) |
|
1344
|
0 |
0 |
if ($load_default_init and $self->detect_lib('default')) |
|
1378
|
0 |
0 |
unless (defined $name) |
|
1398
|
0 |
0 |
unless (-e $name) |
|
1419
|
0 |
0 |
unless ($self->detect_lib($name)) |
|
1437
|
0 |
0 |
unless (-e $name) |
|
1527
|
2 |
0 |
unless ($version_mess) |
|
1533
|
0 |
0 |
if ($version_mess =~ /^ ( GNU \s+ Emacs ) \s+ ( [\d.]* ) /msx) { } |
|
|
0 |
0 |
elsif ($version_mess =~ / ^( XEmacs ) \s+ ( [\d.]* ) /msx) { } |
|
1551
|
0 |
0 |
if (defined $v[0]) { } |
|
1657
|
0 |
0 |
if (defined $retval and $retval =~ /\bCannot \s+ open \s+ load \s+ file: \s+ $lib_name \b/msx) { } |
|
1693
|
0 |
0 |
unless $lib |
|
1707
|
0 |
0 |
if (defined $retval and $retval =~ /\bCannot \s+ open \s+ load \s+ file: \s+ $lib \b/msx) { } |
|
1732
|
0 |
0 |
if ($directories or $volume) |
|
1739
|
0 |
0 |
if ($path_found) { } |
|
|
0 |
0 |
elsif ($ext_found) { } |
|
1783
|
0 |
0 |
if ($last_line and -e $last_line) { } |
|
1813
|
0 |
0 |
if ($arg =~ /\.el$/) { } |
|
1820
|
0 |
0 |
unless ($elisp_file) |
|
2002
|
0 |
2 |
if $AUTOLOAD =~ /DESTROY$/ |
|
2008
|
0 |
2 |
unless defined $ATTRIBUTES{$field} |
|
2015
|
0 |
2 |
if ($name =~ /^set_/) { } |
|
|
0 |
2 |
elsif ($name =~ /^get_/) { } |