diff options
author | matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2001-02-27 07:52:11 +0000 |
---|---|---|
committer | matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2001-02-27 07:52:11 +0000 |
commit | 64fb417473889de0f03bee0f178293ce70623a92 (patch) | |
tree | 1a927def82e6c8c5e14ba34e41aa72f617cf16d6 /eval.c | |
parent | df2d69b49ab1c8b42dd6c18fb63df26aec95f364 (diff) |
* time.c (time_timeval): negative time interval shoule not be
allowed.
* eval.c (proc_call): ignore block to `call' always, despite of
being orphan or not.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@1220 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'eval.c')
-rw-r--r-- | eval.c | 11 |
1 files changed, 1 insertions, 10 deletions
@@ -198,7 +198,6 @@ print_undef(klass, id) rb_class2name(klass)); } - #define CACHE_SIZE 0x800 #define CACHE_MASK 0x7ff #define EXPR1(c,m) ((((c)>>3)^(m))&CACHE_MASK) @@ -6261,19 +6260,11 @@ proc_call(proc, args) Data_Get_Struct(proc, struct BLOCK, data); orphan = blk_orphan(data); - if (orphan) {/* orphan procedure */ - if (rb_block_given_p()) { - ruby_block->frame.iter = ITER_CUR; - } - else { - ruby_block->frame.iter = ITER_NOT; - } - } - /* PUSH BLOCK from data */ old_block = ruby_block; _block = *data; ruby_block = &_block; + ruby_block->frame.iter = ITER_NOT; PUSH_ITER(ITER_CUR); ruby_frame->iter = ITER_CUR; |