kotovalexarian-likes-github/ruby--ruby
1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00
Code Releases Activity

* parse.y (yylex): fixed serious syntax misbehavior. do's

Browse source 
preceding was too high.  a block in `foo bar do .. end' should
  be passed to `foo', not `bar'.


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@1141 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
matz 2001-01-19 19:00:28 +00:00
parent 72d9a8598d
commit 77b8745d4a
3 changed files with 17 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
ChangeLog
View file

@ -1,3 +1,9 @@
Sat Jan 20 03:54:00 2001 Yukihiro Matsumoto <matz@ruby-lang.org>
* parse.y (yylex): fixed serious syntax misbehavior. do's
preceding was too high. a block in `foo bar do .. end' should
be passed to `foo', not `bar'.
Thu Jan 18 04:28:14 2001 Yukihiro Matsumoto <matz@ruby-lang.org>
* io.c (rb_io_s_read): new method to call IO#read from

11
lib/parsedate.rb
View file

@ -1,5 +1,5 @@
# parsedate.rb: Written by Tadayoshi Funaba 2000
# $Id: parsedate.rb,v 1.2 2000-04-01 12:16:56+09 tadf Exp $
# parsedate3.rb: Written by Tadayoshi Funaba 2000, 2001
# $Id: parsedate3.rb,v 1.3 2001-01-18 12:09:47+09 tadf Exp $
module ParseDate
@ -46,7 +46,12 @@ module ParseDate
hour = $1.to_i
min = $2.to_i
sec = $3.to_i if $3
hour += 12 if $4 and $4.downcase == 'p'
if $4
hour %= 12
if $4.downcase == 'p'
hour += 12
end
end
zone = $5
end

8
parse.y
View file

@ -67,7 +67,7 @@ static unsigned long cond_stack = 0;
cond_nest--;\
cond_stack >>= 1;\
} while (0)
#define IN_COND (cond_nest > 0 && (cond_stack&1))
#define COND_P() (cond_nest > 0 && (cond_stack&1))
static int class_nest = 0;
static int in_single = 0;
@ -1489,7 +1489,7 @@ method_call : operation '(' opt_call_args close_paren
close_paren : ')'
{
if (!IN_COND) lex_state = EXPR_PAREN;
if (!COND_P()) lex_state = EXPR_PAREN;
}
stmt_rhs : block_call
@ -3617,9 +3617,7 @@ yylex()
if (state == EXPR_FNAME) {
yylval.id = rb_intern(kw->name);
}
if (kw->id[0] == kDO &&
(state == EXPR_PAREN ||
(!IN_COND && state == EXPR_ARG))) {
if (kw->id[0] == kDO && !COND_P() && state == EXPR_PAREN) {
return kDO2;
}
return kw->id[state != EXPR_BEG];