From 31ac946975a8e20157e1f47d23546ae237484024 Mon Sep 17 00:00:00 2001 From: ko1 Date: Fri, 15 Jun 2007 03:20:13 +0000 Subject: * cont.c (rb_cont_call): forbid cross fiber continuation call. * test/ruby/test_fiber.rb: ditto. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@12542 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- cont.c | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'cont.c') diff --git a/cont.c b/cont.c index 6e37f84707..3450593867 100644 --- a/cont.c +++ b/cont.c @@ -439,6 +439,10 @@ rb_cont_call(int argc, VALUE *argv, VALUE contval) rb_context_t *fcont; GetContPtr(cont->saved_thread.fiber, fcont); + if (th->fiber != cont->saved_thread.fiber) { + rb_raise(rb_eRuntimeError, "continuation called across fiber"); + } + if (!fcont->alive) { rb_raise(rb_eRuntimeError, "continuation called dead fiber"); } @@ -610,7 +614,7 @@ rb_fiber_yield(int argc, VALUE *argv, VALUE fval) cont_restore_0(cont, (VALUE *)&cont); rb_bug("rb_fiber_yield: unreachable"); } - + return value; } -- cgit v1.2.1