3
0
mirror of https://github.com/pragma-/pbot.git synced 2024-11-19 10:29:30 +01:00

CGrammar: Add some missing lowercasing specifiers

This commit is contained in:
Pragmatic Software 2014-07-10 12:24:29 +00:00
parent fab1986a3e
commit 5f9fb29e7e
2 changed files with 6 additions and 6 deletions

View File

@ -13,8 +13,8 @@ use warnings;
# These are set automatically by the build/commit script # These are set automatically by the build/commit script
use constant { use constant {
BUILD_NAME => "PBot", BUILD_NAME => "PBot",
BUILD_REVISION => 723, BUILD_REVISION => 724,
BUILD_DATE => "2014-07-09", BUILD_DATE => "2014-07-10",
}; };
1; 1;

View File

@ -624,7 +624,7 @@ rel_add_mul_shift_expression:
| <leftop: cast_expression rel_mul_add_ex_op cast_expression> | <leftop: cast_expression rel_mul_add_ex_op cast_expression>
{ {
my $expression = join('', @{$item[1]}); my $expression = join('', @{$item[1]});
if($arg{context} =~ /expression/ and $expression =~ / /) { if($arg{context} =~ /expression/ and $expression =~ / / and $expression !~ /the result of the expression/i) {
$return = 'the result of the expression '; $return = 'the result of the expression ';
} }
$return .= $expression; $return .= $expression;
@ -1210,12 +1210,12 @@ argument_expression_list:
my $last = ''; my $last = '';
if (@arg_exp_list > 2) { if (@arg_exp_list > 2) {
$last = pop @arg_exp_list; $last = pop @arg_exp_list;
$return = 's ' . join(', ', @arg_exp_list) . ", and $last"; $return = 's ' . join(', ^L', @arg_exp_list) . ", and ^L$last";
} elsif (@arg_exp_list == 2 ) { } elsif (@arg_exp_list == 2 ) {
$return = "s $arg_exp_list[0] and $arg_exp_list[1]"; $return = "s ^L$arg_exp_list[0] and ^L$arg_exp_list[1]";
} else { } else {
if ($arg_exp_list[0]) { if ($arg_exp_list[0]) {
$return = " $arg_exp_list[0]"; $return = " ^L$arg_exp_list[0]";
} else { } else {
$return = ''; $return = '';
} }