mirror of
https://github.com/ruby/ruby.git
synced 2022-11-09 12:17:21 -05:00
* eval_intern.h: remove UNSUPPORTED() macro.
* thread.c: fix to define Continuation methods (they only do rb_notimplement()). git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@11655 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
parent
0b91bd56c2
commit
0eaefd202a
3 changed files with 16 additions and 11 deletions
|
@ -1,3 +1,10 @@
|
||||||
|
Wed Feb 7 22:41:34 2007 Koichi Sasada <ko1@atdot.net>
|
||||||
|
|
||||||
|
* eval_intern.h: remove UNSUPPORTED() macro.
|
||||||
|
|
||||||
|
* thread.c: fix to define Continuation methods
|
||||||
|
(they only do rb_notimplement()).
|
||||||
|
|
||||||
Wed Feb 7 22:33:58 2007 Koichi Sasada <ko1@atdot.net>
|
Wed Feb 7 22:33:58 2007 Koichi Sasada <ko1@atdot.net>
|
||||||
|
|
||||||
* eval_intern.h, yarvcore.h: remove unused macro definition.
|
* eval_intern.h, yarvcore.h: remove unused macro definition.
|
||||||
|
|
|
@ -6,15 +6,6 @@
|
||||||
(GET_THREAD()->passed_block = \
|
(GET_THREAD()->passed_block = \
|
||||||
GC_GUARDED_PTR_REF((rb_block_t *)GET_THREAD()->cfp->lfp[0]))
|
GC_GUARDED_PTR_REF((rb_block_t *)GET_THREAD()->cfp->lfp[0]))
|
||||||
|
|
||||||
|
|
||||||
#define UNSUPPORTED(func) \
|
|
||||||
{ \
|
|
||||||
int *a = 0; \
|
|
||||||
fprintf(stderr, "%s", "-- unsupported: " #func "\n"); fflush(stderr); \
|
|
||||||
*a = 0; \
|
|
||||||
rb_bug("unsupported: " #func); \
|
|
||||||
}
|
|
||||||
|
|
||||||
#include "ruby.h"
|
#include "ruby.h"
|
||||||
#include "node.h"
|
#include "node.h"
|
||||||
#include "util.h"
|
#include "util.h"
|
||||||
|
|
11
thread.c
11
thread.c
|
@ -2171,7 +2171,7 @@ VALUE rb_cCont;
|
||||||
static VALUE
|
static VALUE
|
||||||
rb_callcc(VALUE self)
|
rb_callcc(VALUE self)
|
||||||
{
|
{
|
||||||
UNSUPPORTED(rb_callcc);
|
rb_notimplement();
|
||||||
return Qnil;
|
return Qnil;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -2194,7 +2194,8 @@ rb_callcc(VALUE self)
|
||||||
static VALUE
|
static VALUE
|
||||||
rb_cont_call(int argc, VALUE *argv, VALUE cont)
|
rb_cont_call(int argc, VALUE *argv, VALUE cont)
|
||||||
{
|
{
|
||||||
UNSUPPORTED(rb_cont_call);
|
rb_notimplement();
|
||||||
|
return Qnil;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* variables for recursive traversals */
|
/* variables for recursive traversals */
|
||||||
|
@ -2371,7 +2372,13 @@ Init_Thread(void)
|
||||||
|
|
||||||
recursive_key = rb_intern("__recursive_key__");
|
recursive_key = rb_intern("__recursive_key__");
|
||||||
rb_eThreadError = rb_define_class("ThreadError", rb_eStandardError);
|
rb_eThreadError = rb_define_class("ThreadError", rb_eStandardError);
|
||||||
|
|
||||||
rb_cCont = rb_define_class("Continuation", rb_cObject);
|
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();
|
Init_native_thread();
|
||||||
{
|
{
|
||||||
|
|
Loading…
Reference in a new issue