From e11c188e3ccf4a9e69e1c8f737fbbe0261cd2ce2 Mon Sep 17 00:00:00 2001 From: ko1 Date: Wed, 7 Feb 2007 13:44:11 +0000 Subject: * eval_intern.h: remove UNSUPPORTED() macro. * thread.c: fix to define Continuation methods (they only do rb_notimplement()). git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@11655 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- thread.c | 11 +++++++++-- 1 file changed, 9 insertions(+), 2 deletions(-) (limited to 'thread.c') diff --git a/thread.c b/thread.c index 792835fa5..f2e9e775b 100644 --- a/thread.c +++ b/thread.c @@ -2171,7 +2171,7 @@ VALUE rb_cCont; static VALUE rb_callcc(VALUE self) { - UNSUPPORTED(rb_callcc); + rb_notimplement(); return Qnil; } @@ -2194,7 +2194,8 @@ rb_callcc(VALUE self) static VALUE rb_cont_call(int argc, VALUE *argv, VALUE cont) { - UNSUPPORTED(rb_cont_call); + rb_notimplement(); + return Qnil; } /* variables for recursive traversals */ @@ -2371,7 +2372,13 @@ Init_Thread(void) recursive_key = rb_intern("__recursive_key__"); rb_eThreadError = rb_define_class("ThreadError", rb_eStandardError); + rb_cCont = rb_define_class("Continuation", rb_cObject); + rb_undef_alloc_func(rb_cCont); + rb_undef_method(CLASS_OF(rb_cCont), "new"); + rb_define_method(rb_cCont, "call", rb_cont_call, -1); + rb_define_method(rb_cCont, "[]", rb_cont_call, -1); + rb_define_global_function("callcc", rb_callcc, 0); Init_native_thread(); { -- cgit