| line |
!l |
l&&!r |
l&&r |
condition |
|
47
|
6 |
0 |
0 |
$debug and /\S/ |
|
665
|
122 |
0 |
0 |
$text =~ s/\A(($roman)im(?:o|ae)(que|ve|))\b//xi and length $2 |
|
|
122 |
0 |
0 |
$text =~ s/\A(($roman)im(?:um|os|am|as)(que|ve|))\b//xi and length $2 |
|
|
14 |
106 |
2 |
$text =~ s/\A(($roman)(que|ve|))\b//xi and length $2 |
|
979
|
6 |
0 |
0 |
$lex || $debug and @tokens |
|
999
|
3 |
18 |
0 |
@$toks and $toks->[0]{'lex'} eq "CONNECTIVE" |
|
1032
|
26 |
4 |
0 |
@Dstack and ($Dstack[-1]{'V'}{'lex'} || '') eq "OWNER_D" |
|
1038
|
8 |
9 |
10 |
$Vstack[-1]{'lex'} =~ /^SUBNAME_?A?D?$/ and not $lookahead->{'lex'} =~ /PERIOD|DO|END|CONNECTIVE/ |
|
1045
|
3 |
2 |
12 |
$needA and $needA ne "OA" |
|
|
5 |
12 |
0 |
$needA and $needA ne "OA" and @Astack <= 1 || !$Astack[-1]{'complete'} |
|
|
7 |
9 |
1 |
$needD eq "D" and not @Dstack |
|
|
16 |
0 |
0 |
$needD eq "B" and not @Bstack |
|
1050
|
2 |
0 |
14 |
$needA && @Astack > 1 |
|
1052
|
12 |
0 |
0 |
$Dindir and $verb->{'lex'} =~ /SUBNAME_.*_DATIVE|OWNER_D/ |
|
1074
|
0 |
0 |
0 |
$ord->{'lex'} and $ord->{'lex'} eq "NUMERAL" |
|
1090
|
95 |
0 |
0 |
$Dindir and $tok->{'lex'} eq "ORDINAL_DATIVE" |
|
|
71 |
0 |
0 |
$Dindir and $tok->{'lex'} eq "DATIVE" |
|
|
0 |
0 |
4 |
$eatend and $tok->{'lex'} =~ /$eatend/ |
|
|
0 |
0 |
0 |
$noeatend and $tok->{'lex'} =~ /$noeatend/ |
|
1093
|
3 |
8 |
0 |
$1 eq "NUMERAL" and $toks->[0]{'lex'} eq "ORDINAL" |
|
1154
|
0 |
3 |
0 |
$ord->{'lex'} and $ord->{'lex'} eq "NUMERAL" |
|
1171
|
0 |
1 |
22 |
$lastownable and @Astack > 1 |
|
|
1 |
3 |
19 |
$lastownable and @Astack > 1 and $lastownable == $Astack[-1]{'data'} |
|
1173
|
0 |
0 |
23 |
@Astack > 1 and $Astack[-1]{'complete'} |
|
1208
|
2 |
9 |
1 |
&$reduce($tok) and not $Vdone |
|
1210
|
11 |
0 |
0 |
$connective and not $Vdone || @Astack <= 1 |
|
1216
|
0 |
0 |
0 |
&$reduce($tok) and not $Vdone |
|
1243
|
2 |
19 |
0 |
$Vdone and @Vstack |
|
1250
|
21 |
0 |
0 |
@Astack > 1 and not @Vstack |
|
1252
|
21 |
0 |
0 |
@Dstack and not @Vstack |
|
1324
|
2 |
0 |
0 |
($self->{'perl'} || '') eq "while" and ($self->{'C'}{'V'}{'perl'} || '') eq "Lingua::Romana::Perligata::getline" |
|
1370
|
16 |
0 |
0 |
$verb =~ /^(bless)$/ && $dative =~ /^[%\@]/ |
|
1372
|
2 |
5 |
2 |
$dative && defined $_[0]{'A'} && !$hasblock && !($verb =~ /^(print|printf)$/) |
|
1373
|
4 |
0 |
0 |
$prefix and $dative |
|
1600
|
8 |
2 |
0 |
$context and $context->{'raw'} =~ /^inque/ |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
979
|
0 |
0 |
6 |
$lex || $debug |
|
1038
|
10 |
0 |
17 |
$Vstack[-1]{'lex'} =~ /^SUBNAME_?A?D?$/ and not $lookahead->{'lex'} =~ /PERIOD|DO|END|CONNECTIVE/ or ref $Vstack[-1] eq "STATEMENT" |
|
1042
|
12 |
2 |
3 |
$needA ||= $verb->{'lex'} eq "SUBNAME" ? "OA" : "" |
|
1045
|
0 |
0 |
12 |
@Astack <= 1 || !$Astack[-1]{'complete'} |
|
|
0 |
1 |
16 |
$needA and $needA ne "OA" and @Astack <= 1 || !$Astack[-1]{'complete'} or $needD eq "D" and not @Dstack |
|
|
1 |
0 |
16 |
$needA and $needA ne "OA" and @Astack <= 1 || !$Astack[-1]{'complete'} or $needD eq "D" and not @Dstack or $needD eq "B" and not @Bstack |
|
1052
|
4 |
0 |
12 |
$verb->{'lex'} =~ /SUBNAME_.*_ACCUSATIVE/ or $Dindir and $verb->{'lex'} =~ /SUBNAME_.*_DATIVE|OWNER_D/ |
|
1090
|
11 |
0 |
95 |
$tok->{'lex'} =~ /^(NUMERAL|ORDINAL)$/ or $Dindir and $tok->{'lex'} eq "ORDINAL_DATIVE" |
|
|
24 |
0 |
71 |
$tok->{'lex'} =~ /^(?:ACCUSATIVE|NAME)$/ or $Dindir and $tok->{'lex'} eq "DATIVE" |
|
1210
|
0 |
0 |
0 |
$Vdone || @Astack <= 1 |
|
1218
|
0 |
0 |
0 |
$Vdone or @Astack <= 1 |
|
1229
|
0 |
0 |
0 |
pop(@Astack)->{'data'} || pop @Dstack |
|
1254
|
19 |
2 |
0 |
$Vdone or $empty |
|
1301
|
0 |
2 |
0 |
$self->{'C'}{'lex'} || $self->{'C'}{'V'}{'lex'} |
|
1328
|
0 |
0 |
2 |
not @$toks or $toks->[0]{'lex'} =~ /PERIOD|CONNECTIVE/ |
|
1365
|
1 |
0 |
15 |
$_[0]{'V'}{'lex'} eq 'OWNER_D' && $_[0]{'V'}{'raw'} =~ /o$/ || $_[0]{'V'}{'raw'} =~ /^(finis|nuntius|factor(em|i))$/ || $hasblock |