summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ChangeLog16
-rw-r--r--KNOWNBUGS.rb2
-rw-r--r--bootstraptest/test_flow.rb14
-rw-r--r--thread.c24
-rw-r--r--version.h6
-rw-r--r--vm.c4
-rw-r--r--vm_core.h12
7 files changed, 53 insertions, 25 deletions
diff --git a/ChangeLog b/ChangeLog
index f7f3e0cae7..7f0755df3f 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,19 @@
+Fri Jan 11 16:57:31 2013 NAKAMURA Usaku <usa@ruby-lang.org>
+
+ * vm_trace.c (rb_threadptr_exec_event_hooks): added a parameter to pop
+ a frame before JUMP_TAG() if exception occurred. This change fix bug
+ of Ruby 1.9. [ruby-core:51128] [ruby-trunk - Bug #7624]
+
+ * vm_core.h (EXEC_EVENT_HOOK_AND_POP_FRAME): add to use
+ `rb_threadptr_exec_event_hooks()' with the pop flag.
+
+ * vm.c (vm_exec): use EXEC_EVENT_HOOK_AND_POP_FRAME() while exception
+ handling. While exception hadnling, if an exception is raised in
+ hooks, need to pop current frame and raise this raised exception by
+ hook.
+
+ * bootstraptest/test_flow.rb: add a test.
+
Mon Jan 7 15:50:25 2013 Nobuyoshi Nakada <nobu@ruby-lang.org>
* vm.c (rb_vm_make_proc): save the proc made from the given block so
diff --git a/KNOWNBUGS.rb b/KNOWNBUGS.rb
index e89c8d48ba..b97a08d928 100644
--- a/KNOWNBUGS.rb
+++ b/KNOWNBUGS.rb
@@ -3,5 +3,3 @@
# So all tests will cause failure.
#
-assert_equal('', "set_trace_func(proc{|t,|raise if t == 'line'})\n""1\n'ok'")
-assert_finish(3, "def m; end\n""set_trace_func(proc{|t,|raise if t == 'return'})\n""m")
diff --git a/bootstraptest/test_flow.rb b/bootstraptest/test_flow.rb
index fc93a5a46c..6b3ef749c3 100644
--- a/bootstraptest/test_flow.rb
+++ b/bootstraptest/test_flow.rb
@@ -562,3 +562,17 @@ assert_equal %Q{ENSURE\n}, %q{
assert_equal "false", src + %q{e.all? {false}}, bug
assert_equal "true", src + %q{e.include?(:foo)}, bug
end
+
+assert_equal('ok', %q{
+ class FOO < RuntimeError; end
+ class BAR < RuntimeError; end
+ def m
+ raise FOO
+ end
+ set_trace_func(proc{|t,| raise BAR if t == 'return'})
+ begin
+ m
+ rescue BAR
+ 'ok'
+ end
+}, '[ruby-core:51128] [ruby-trunk - Bug #7624]')
diff --git a/thread.c b/thread.c
index 5393e4b453..c7da34b58d 100644
--- a/thread.c
+++ b/thread.c
@@ -4060,7 +4060,7 @@ enum {
EVENT_RUNNING_EVENT_MASK = EVENT_RUNNING_VM|EVENT_RUNNING_THREAD
};
-static VALUE thread_suppress_tracing(rb_thread_t *th, int ev, VALUE (*func)(VALUE, int), VALUE arg, int always);
+static VALUE thread_suppress_tracing(rb_thread_t *th, int ev, VALUE (*func)(VALUE, int), VALUE arg, int always, int pop_p);
struct event_call_args {
rb_thread_t *th;
@@ -4145,25 +4145,16 @@ set_threads_event_flags(int flag)
static inline int
exec_event_hooks(const rb_event_hook_t *hook, rb_event_flag_t flag, VALUE self, ID id, VALUE klass)
{
- volatile int removed = 0;
- const rb_event_hook_t *volatile hnext = 0;
- int state;
-
- PUSH_TAG();
- if ((state = EXEC_TAG()) != 0) {
- hook = hnext;
- }
+ int removed = 0;
for (; hook; hook = hook->next) {
if (hook->flag & RUBY_EVENT_REMOVED) {
removed++;
continue;
}
if (flag & hook->flag) {
- hnext = hook->next;
(*hook->func)(flag, hook->data, self, id, klass);
}
}
- POP_TAG();
return removed;
}
@@ -4208,7 +4199,7 @@ thread_exec_event_hooks(VALUE args, int running)
}
void
-rb_threadptr_exec_event_hooks(rb_thread_t *th, rb_event_flag_t flag, VALUE self, ID id, VALUE klass)
+rb_threadptr_exec_event_hooks(rb_thread_t *th, rb_event_flag_t flag, VALUE self, ID id, VALUE klass, int pop_p)
{
const VALUE errinfo = th->errinfo;
struct event_call_args args;
@@ -4218,7 +4209,7 @@ rb_threadptr_exec_event_hooks(rb_thread_t *th, rb_event_flag_t flag, VALUE self,
args.id = id;
args.klass = klass;
args.proc = 0;
- thread_suppress_tracing(th, EVENT_RUNNING_EVENT_MASK, thread_exec_event_hooks, (VALUE)&args, FALSE);
+ thread_suppress_tracing(th, EVENT_RUNNING_EVENT_MASK, thread_exec_event_hooks, (VALUE)&args, FALSE, pop_p);
th->errinfo = errinfo;
}
@@ -4567,11 +4558,11 @@ VALUE
ruby_suppress_tracing(VALUE (*func)(VALUE, int), VALUE arg, int always)
{
rb_thread_t *th = GET_THREAD();
- return thread_suppress_tracing(th, EVENT_RUNNING_TRACE, func, arg, always);
+ return thread_suppress_tracing(th, EVENT_RUNNING_TRACE, func, arg, always, 0);
}
static VALUE
-thread_suppress_tracing(rb_thread_t *th, int ev, VALUE (*func)(VALUE, int), VALUE arg, int always)
+thread_suppress_tracing(rb_thread_t *th, int ev, VALUE (*func)(VALUE, int), VALUE arg, int always, int pop_p)
{
int state, tracing = th->tracing, running = tracing & ev;
volatile int raised;
@@ -4601,6 +4592,9 @@ thread_suppress_tracing(rb_thread_t *th, int ev, VALUE (*func)(VALUE, int), VALU
th->tracing = tracing;
if (state) {
+ if (pop_p) {
+ th->cfp = RUBY_VM_PREVIOUS_CONTROL_FRAME(th->cfp);
+ }
JUMP_TAG(state);
}
th->state = outer_state;
diff --git a/version.h b/version.h
index a955faeea4..493488b000 100644
--- a/version.h
+++ b/version.h
@@ -1,10 +1,10 @@
#define RUBY_VERSION "1.9.3"
-#define RUBY_PATCHLEVEL 363
+#define RUBY_PATCHLEVEL 364
-#define RUBY_RELEASE_DATE "2013-01-07"
+#define RUBY_RELEASE_DATE "2013-01-11"
#define RUBY_RELEASE_YEAR 2013
#define RUBY_RELEASE_MONTH 1
-#define RUBY_RELEASE_DAY 7
+#define RUBY_RELEASE_DAY 11
#include "ruby/version.h"
diff --git a/vm.c b/vm.c
index 70e8d3b35c..4c44aa4a41 100644
--- a/vm.c
+++ b/vm.c
@@ -1424,10 +1424,10 @@ vm_exec(rb_thread_t *th)
switch (VM_FRAME_TYPE(th->cfp)) {
case VM_FRAME_MAGIC_METHOD:
- EXEC_EVENT_HOOK(th, RUBY_EVENT_RETURN, th->cfp->self, 0, 0);
+ EXEC_EVENT_HOOK_AND_POP_FRAME(th, RUBY_EVENT_RETURN, th->cfp->self, 0, 0);
break;
case VM_FRAME_MAGIC_CLASS:
- EXEC_EVENT_HOOK(th, RUBY_EVENT_END, th->cfp->self, 0, 0);
+ EXEC_EVENT_HOOK_AND_POP_FRAME(th, RUBY_EVENT_END, th->cfp->self, 0, 0);
break;
}
diff --git a/vm_core.h b/vm_core.h
index 1a1016217a..ee49704317 100644
--- a/vm_core.h
+++ b/vm_core.h
@@ -728,17 +728,23 @@ void rb_thread_lock_destroy(rb_thread_lock_t *);
/* tracer */
void
-rb_threadptr_exec_event_hooks(rb_thread_t *th, rb_event_flag_t flag, VALUE self, ID id, VALUE klass);
+rb_threadptr_exec_event_hooks(rb_thread_t *th, rb_event_flag_t flag, VALUE self, ID id, VALUE klass, int pop_p);
-#define EXEC_EVENT_HOOK(th, flag, self, id, klass) do { \
+#define EXEC_EVENT_HOOK_ORIG(th, flag, self, id, klass, pop_p) do { \
rb_event_flag_t wait_event__ = (th)->event_flags; \
if (UNLIKELY(wait_event__)) { \
if (wait_event__ & ((flag) | RUBY_EVENT_VM)) { \
- rb_threadptr_exec_event_hooks((th), (flag), (self), (id), (klass)); \
+ rb_threadptr_exec_event_hooks((th), (flag), (self), (id), (klass), (pop_p)); \
} \
} \
} while (0)
+#define EXEC_EVENT_HOOK(th, flag, self, id, klass) \
+ EXEC_EVENT_HOOK_ORIG(th, flag, self, id, klass, 0)
+
+#define EXEC_EVENT_HOOK_AND_POP_FRAME(th, flag, self, id, klass) \
+ EXEC_EVENT_HOOK_ORIG(th, flag, self, id, klass, 1)
+
#if defined __GNUC__ && __GNUC__ >= 4
#pragma GCC visibility push(default)
#endif