mirror of
https://github.com/pragma-/pbot.git
synced 2024-11-26 22:09:26 +01:00
CGrammar: Translate ' ' to "a space"; touch up translation of "the result of the expression the result of the function" to just "the result of the function"
This commit is contained in:
parent
ed73046d6b
commit
46a0184791
@ -13,8 +13,8 @@ use warnings;
|
||||
# These are set automatically by the build/commit script
|
||||
use constant {
|
||||
BUILD_NAME => "PBot",
|
||||
BUILD_REVISION => 734,
|
||||
BUILD_DATE => "2014-07-15",
|
||||
BUILD_REVISION => 735,
|
||||
BUILD_DATE => "2014-07-16",
|
||||
};
|
||||
|
||||
1;
|
||||
|
@ -585,7 +585,7 @@ logical_OR_AND_expression:
|
||||
{
|
||||
if (defined $arg{context} and $arg{context} eq 'for conditional') { print STDERR "hmm2\n"; }
|
||||
my $expression = join('', @{$item[1]});
|
||||
if($arg{context} =~ /initializer expression$/ and $expression =~ / / and $expression !~ /^the .*? number \S+$/i) {
|
||||
if($arg{context} =~ /initializer expression$/ and $expression =~ / / and $expression !~ /^the .*? number \S+$/i and $expression !~ /^the result of the/) {
|
||||
$return = 'the result of the expression ^L';
|
||||
}
|
||||
$return .= $expression;
|
||||
@ -1835,6 +1835,8 @@ constant:
|
||||
$return = 'a backspace character';
|
||||
} elsif ($constant eq q('\'')) {
|
||||
$return = 'a single-quote';
|
||||
} elsif ($constant eq q(' ')) {
|
||||
$return = 'a space';
|
||||
} else {
|
||||
$return = $constant;
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user