From 53041ad564a7269c0daae0e7b5a34d89f95de50e Mon Sep 17 00:00:00 2001 From: nobu Date: Sun, 20 Jul 2008 13:50:14 +0000 Subject: * compile.c (iseq_compile_each): NODE_POSTEXE should set each end procs only once. [ruby-dev:35596] git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@18136 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- compile.c | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'compile.c') diff --git a/compile.c b/compile.c index 074c3a5fd..6f37f0d94 100644 --- a/compile.c +++ b/compile.c @@ -4527,12 +4527,21 @@ iseq_compile_each(rb_iseq_t *iseq, LINK_ANCHOR *ret, NODE * node, int poped) break; } case NODE_POSTEXE:{ + LABEL *lstart = NEW_LABEL(nd_line(node)); + LABEL *lend = NEW_LABEL(nd_line(node)); VALUE block = NEW_CHILD_ISEQVAL(node->nd_body, make_name_for_block(iseq), ISEQ_TYPE_BLOCK); + ADD_LABEL(ret, lstart); + ADD_INSN2(ret, nd_line(node), onceinlinecache, 0, lend); + ADD_INSN(ret, nd_line(node), pop); + ADD_INSN1(ret, nd_line(node), putspecialobject, INT2FIX(VM_SPECIAL_OBJECT_VMCORE)); ADD_INSN1(ret, nd_line(node), putiseq, block); ADD_SEND (ret, nd_line(node), ID2SYM(id_core_set_postexe), INT2FIX(1)); + ADD_INSN1(ret, nd_line(node), setinlinecache, lstart); + ADD_LABEL(ret, lend); + if (poped) { ADD_INSN(ret, nd_line(node), pop); } -- cgit