line |
true |
false |
branch |
162
|
0 |
50 |
unless @_ |
174
|
50 |
0 |
if defined $x |
178
|
0 |
50 |
$#res || wantarray ? : |
188
|
0 |
0 |
if $x |
192
|
0 |
0 |
$#res ? : |
483
|
0 |
0 |
ref $_[0] eq 'HASH' ? : |
509
|
4 |
9 |
if ($_[0] =~ /([aeioô]r)$/) |
522
|
0 |
729 |
if $tc > $#tense |
523
|
0 |
729 |
unless defined $t |
526
|
0 |
729 |
if chomp $_ |
529
|
0 |
729 |
if ($_ eq 'model') |
530
|
0 |
0 |
unless $_ = shift() |
532
|
0 |
0 |
if chomp $_ |
539
|
116 |
613 |
if (defined $tense{$_} or "$_" eq ',' or $p == 6) { } |
|
4 |
609 |
elsif ($tc == 10 and $p == 1) { } |
|
10 |
599 |
elsif ($tc == 9 and $p == 0) { } |
|
0 |
599 |
elsif ($_ eq 'etc' and $edg and $p and $x = $res{$t}[$p - 1]) { } |
|
0 |
599 |
elsif ($_ eq 'acc' and $root and $edg) { } |
542
|
0 |
116 |
!defined($tense{$_}) && "$_" ne ',' ? : |
544
|
1 |
115 |
if ($p == 5) |
550
|
10 |
106 |
if (defined $tense{$t = $_}) { } |
558
|
116 |
0 |
unless $p6 |
580
|
0 |
0 |
unless ($x =~ / $reg{$edg}{$t}[$p - 1] $/x) |
582
|
0 |
0 |
if ($x =~ / $reg{$e}{$t}[$p - 1] $/x) |
591
|
0 |
0 |
unless $p == 3 and $reg{$edg2}{$t}[$p] =~ /^i/ and $x =~ /i([$cons]{1,2}|ç|gu)$/o |
605
|
0 |
613 |
unless defined $tense{$t} |
609
|
613 |
0 |
if "$_" ne '.' |
612
|
0 |
13 |
if ($p == 5) |
642
|
0 |
0 |
ref $_[0] eq 'HASH' ? : |
661
|
0 |
0 |
unless $v |
673
|
0 |
0 |
if ($r =~ /[:=]/) |
674
|
0 |
0 |
if ($c eq ':') { } |
|
0 |
0 |
elsif ($v =~ /defectivos([1234])?/) { } |
684
|
0 |
0 |
unless $_ |
689
|
0 |
0 |
$dnum eq '3' ? : |
691
|
0 |
0 |
$dnum eq '3' ? : |
692
|
0 |
0 |
$dnum eq '3' ? : |
696
|
0 |
0 |
if defined $tmpmodel |
707
|
0 |
0 |
if (@s) |
737
|
0 |
0 |
if ($c eq ':') { } |
|
0 |
0 |
elsif ($v =~ /defectivos([1234])?/) { } |
742
|
0 |
0 |
unless $_ |
773
|
0 |
0 |
ref $_[0] eq 'HASH' ? : |
800
|
0 |
0 |
if ($c eq ':') |
815
|
0 |
0 |
unless $e =~ /$d2/ |
822
|
0 |
0 |
if ($#u >= 0) |
825
|
0 |
0 |
if ($#t >= 0) |
828
|
0 |
0 |
if ($w) { } |
829
|
0 |
0 |
defined $$verb{$v}{'model'} ? : |
838
|
0 |
0 |
@s ? : |
849
|
0 |
0 |
if "$w" |
862
|
0 |
0 |
if $w =~ /g[aou][^g]*$/ |
869
|
0 |
0 |
if $w =~ /c[aou][^c]*$/ |
876
|
0 |
14 |
if $w =~ /g[ei][^g]*$/ |
883
|
0 |
0 |
if $w =~ /c[ei][^c]*$/ |
897
|
0 |
0 |
if $w =~ /gu[aou][^g]*$/ |
911
|
0 |
0 |
if $p == 3 and $t eq 'pres' or $p == 2 and $t eq 'ivo' |
920
|
0 |
0 |
if $t eq 'pres' and $p == 2 || $p == 3 or $t eq 'ivo' and $p == 2 |
924
|
0 |
0 |
if $t eq 'imp' or $t eq 'mdp' or $t eq 'perf' and $p != 3 or $t eq 'pres' and $p == 4 |
934
|
24 |
0 |
unless exists $$verb{'defectivos'}{$v} |
936
|
0 |
0 |
unless ($v =~ /^(.*)([aeioô]r)$/) |
944
|
0 |
0 |
if $$verb{'defectivos'}{$v} =~ /[12]/ and defined $reg{$edg}{$t}[$p - 1] and not $reg{$edg}{$t}[$p - 1] =~ /["^$vocs"]*["$vocs"]["^$vocs"]*["$vocs"]/o || $reg{$edg}{$t}[$p - 1] =~ /["^$vocs"]*(["$vocs"])/o && ($1 eq 'i' || $1 eq 'í' || "$$verb{'defectivos'}{$v}" eq '2' && $1 eq 'e') or "$$verb{'defectivos'}{$v}" eq '4' and $p != 3 and $p != 6 or 'precaver' eq $$verb{'defectivos'}{$v} and $t eq 'pres' && $p != 4 || $t =~ /(cpres|ivo)/ or 'adequar' eq $$verb{'defectivos'}{$v} and $t =~ /c?pres/ && $p != 4 || $t eq 'ivo' |
975
|
0 |
11 |
ref $_[0] eq 'HASH' ? : |
981
|
0 |
10 |
if ($v =~ /[iaeoô]r$/) |
989
|
2 |
16 |
if (/q/) { } |
|
3 |
13 |
elsif (/v/) { } |
|
0 |
13 |
elsif (/r/) { } |
|
0 |
13 |
elsif (/c/) { } |
|
5 |
8 |
elsif (/s/) { } |
|
3 |
5 |
elsif (/h/) { } |
|
4 |
1 |
elsif (/l/) { } |
|
0 |
1 |
elsif (/o/) { } |
|
1 |
0 |
elsif (/x/) { } |
|
0 |
0 |
elsif (/i/) { } |
1012
|
11 |
0 |
if $v |
1015
|
0 |
20 |
if (ref $$cur_verb{$w} eq 'HASH') { } |
1021
|
17 |
3 |
($v = shift()) ? : |
1026
|
0 |
11 |
unless @t |
1036
|
8 |
3 |
if (defined $v and $v =~ /^ [1-6] $/x) { } |
1042
|
3 |
8 |
unless @p |
1057
|
0 |
11 |
if /[\"\'\^\\\~]/ |
1069
|
0 |
11 |
unless ($v =~ /^(.*)([aeioô]r)$/) |
1078
|
0 |
11 |
if ($v =~ /g[ei]r$/) { } |
|
0 |
11 |
elsif ($v =~ /c[ei]r$/) { } |
|
6 |
5 |
elsif ($v =~ /g[ao]r$/) { } |
|
0 |
5 |
elsif ($v =~ /çar$/) { } |
|
0 |
5 |
elsif ($v =~ /c[ao]r$/) { } |
|
0 |
5 |
elsif ($v =~ /gu[ei]r$/) { } |
|
0 |
5 |
elsif ($v =~ /[^g]uir$/) { } |
|
0 |
5 |
elsif ($v =~ /air$/) { } |
|
0 |
5 |
elsif ($v =~ /oer$/) { } |
|
0 |
5 |
elsif ($v =~ /oar$/) { } |
|
0 |
5 |
elsif ($v =~ /oiar$/ and $v ne 'boiar') { } |
|
0 |
5 |
elsif ($v =~ /(uzir|zer)$/) { } |
|
0 |
5 |
elsif ($v =~ /ear$/) { } |
1085
|
0 |
0 |
unless $v eq 'sair' |
1087
|
0 |
0 |
unless $v eq 'moer' |
1089
|
0 |
0 |
unless $v eq 'perdoar' |
1096
|
0 |
0 |
unless $v eq 'passear' |
1104
|
9 |
2 |
if ($verbose) |
1107
|
0 |
6 |
defined $$verb{$v}{'model'} ? : |
|
6 |
3 |
defined $$verb{$v} ? : |
|
0 |
9 |
defined $$verb{'defectivos'}{$v} ? : |
1115
|
9 |
0 |
if (@p != @res) |
1123
|
8 |
3 |
if (defined $$verb{$v}) { } |
1125
|
0 |
1 |
unless ($rr, $vr, $cr) = $root =~ /^ (.*) ($vpat+) ($cpat* \^?) $/ox or $root =~ /^ $cpat* \^? $/ox and $rr = $root || 1 |
1134
|
0 |
8 |
if (defined($m = $$verb{$v}{'model'})) |
1135
|
0 |
0 |
unless defined $$verb{$m} |
1143
|
0 |
0 |
unless (($prefix) = $v =~ /(.*)$m$/) |
1145
|
0 |
0 |
unless (length $em > 1 and ($prefix) = $v =~ /(.*)$em$/ and $missing = 1) |
1148
|
0 |
0 |
if length $em > 1 and ($prefix) = $v =~ /(.*)$em$/ |
1160
|
0 |
14 |
unless defined $reg{'er'}{$t} |
1162
|
4 |
6 |
$long ? : |
|
10 |
4 |
if $verbose |
1167
|
19 |
30 |
($w = $$verb{$v}{$t}[$p - 1]) ? : |
1169
|
0 |
30 |
if (not $w and $m and $y = $$verb{$m}{$t}[$p - 1]) |
1172
|
0 |
0 |
if ($prefix) { } |
1176
|
0 |
0 |
unless ($vy, $cy, $ey) = $y =~ / ($vpat+) ($cpat?) ($endg{$t}[$p - 1]) $/x |
1182
|
0 |
0 |
$cm eq $cy ? : |
1188
|
0 |
0 |
if (not $w and "$t" eq 'cpres' and ($y = $$verb{$v}{'cpres'}[0]) || $m && ($y = $$verb{$m}{'cpres'}[0])) |
1194
|
0 |
0 |
unless ($vy, $cy, $ey) = $y =~ / ($vpat+) ($cpat?) ($endg{'cpres'}[0]) $/x |
1198
|
0 |
0 |
!defined($cr) || defined $cy && $cr eq $cy ? : |
1210
|
0 |
49 |
if (not $w and "$t" eq 'cimp' || "$t" eq 'cfut' and ($y = $$verb{$v}{'perf'}[0]) || $m && $$verb{$m}{'perf'}[0]) { } |
|
0 |
49 |
elsif (not $w and "$t" eq 'ivo' and $p != 1 and $p != 5 and ($y = $$verb{$v}{'cpres'}[$p - 1]) || $m && $$verb{$m}{'cpres'}[$p - 1]) { } |
|
0 |
49 |
elsif (not $w and "$t" eq 'ivo' and $p != 1 and $p == 5) { } |
1214
|
0 |
0 |
unless ($y) |
1216
|
0 |
0 |
if ($prefix) { } |
1221
|
0 |
0 |
unless ($vy, $cy, $ey) = $y =~ / ($vpat+) ($cpat?)($endg{'perf'}[0]) $/x |
1225
|
0 |
0 |
$cr eq $cy ? : |
1231
|
0 |
0 |
if ($y =~ s/([$vocs])$//ox) |
1234
|
0 |
0 |
unless $z =~ s/^([\'\^\"])([$vocs])([\'\^\"]?)([$vocs])/$1$2/ox |
1250
|
0 |
0 |
unless ($y) |
1251
|
0 |
0 |
if ($prefix) { } |
1258
|
0 |
0 |
if ($p != 5) { } |
1260
|
0 |
0 |
unless ($vy, $cy, $ey) = $y =~ / ([$vocs]) ($cpat?) ($endg{'cpres'}[$p - 1]) $/x |
1267
|
0 |
0 |
unless ($vy, $cy) = $y =~ / ([$vocs]) ($cpat) /x |
1283
|
16 |
33 |
if not $w and defined $reg{$edg}{$t}[$p - 1] |
1286
|
14 |
2 |
if $w and not $ex and $modif |
1289
|
28 |
21 |
unless ($regexp or not defined $w) |
1294
|
0 |
49 |
if ($$verb{'defectivos'}{$v}) |
1304
|
0 |
0 |
if is_defectivo($verb, $v, $t, $p) |
1307
|
35 |
14 |
if $w |
1318
|
0 |
6 |
unless defined $reg{'er'}{$t} |
1320
|
4 |
2 |
$long ? : |
|
6 |
0 |
if $verbose |
1326
|
24 |
0 |
if (defined($s = $reg{$edg}{$t}[$p - 1])) |
1328
|
0 |
24 |
if $modif |
1330
|
0 |
24 |
if is_defectivo($verb, $v, $t, $p) |
1340
|
0 |
11 |
unless ($isoacc) |
1342
|
0 |
0 |
if ($rc ne 'h') { } |
1349
|
4 |
7 |
if ($rc eq 'c') { } |
|
0 |
7 |
elsif ($rc eq 'r') { } |
|
4 |
3 |
elsif ($rc eq 's') { } |
|
3 |
0 |
elsif ($rc eq 'h') { } |
1364
|
11 |
0 |
ref $_[0] eq 'HASH' ? : |
1369
|
5 |
6 |
if not $v or defined $$verb{$v} |
1373
|
0 |
6 |
if defined $$verb{$v} |
1376
|
3 |
3 |
if ($vlist =~ / \b$v \s* : \s* ( [^=:]+ [=:]? ) /mx) |
1387
|
0 |
0 |
if ($vlist =~ / \b$v \s* ([^\s=:]|\Z) /x and $` =~ / ([^\s\n]*)\s* ( = [^\:\=]*) \Z/x and not $1 =~ /^defectivos[1234]?$/) |
1397
|
0 |
6 |
if ($vlist =~ / defectivos([1234])?\s* ( = [^\:\=]*) \b$v \s*
([^\s=:]|\Z) /x) |
1402
|
0 |
0 |
$1 eq '3' ? : |
1404
|
0 |
0 |
$1 eq '3' ? : |
1419
|
0 |
4 |
unless defined $sep |
1422
|
0 |
4 |
unless $ncols |
1423
|
0 |
4 |
if $ncols < 0 |
1432
|
22 |
30 |
if defined $_ and $mx[$i] < ($a = length $_) |
1439
|
46 |
6 |
defined $_ ? : |
1441
|
10 |
42 |
unless $i |
1443
|
0 |
4 |
unless $res =~ /\n$/ |
1450
|
0 |
0 |
unless defined $sep |
1452
|
0 |
0 |
$#$l + 1 > $nrows ? : |
1454
|
0 |
0 |
unless $nrows |
1455
|
0 |
0 |
if $nrows < 0 |
1462
|
0 |
0 |
unless defined $_ |
1463
|
0 |
0 |
if defined $_ and $mx[$j] < ($a = length $_) |
1465
|
0 |
0 |
unless $i |
1472
|
0 |
0 |
unless $i |
1483
|
0 |
0 |
if (exists $ENV{$v} and defined $ENV{$v}) |