diff options
-rw-r--r-- | ChangeLog | 8 | ||||
-rw-r--r-- | eval.c | 14 | ||||
-rw-r--r-- | intern.h | 1 |
3 files changed, 20 insertions, 3 deletions
@@ -1,3 +1,11 @@ +Tue Oct 16 21:38:15 2001 Nobuyoshi Nakada <nobu.nakada@nifty.ne.jp> + + * eval.c (rb_f_missing): check stack level with rb_stack_check(). + + * eval.c (rb_call0): ditto. + + * eval.c, intern.h (rb_stack_check): added. [new] + Tue Oct 16 13:18:47 2001 Nobuyoshi Nakada <nobu.nakada@nifty.ne.jp> * object.c (rb_mod_initialize): optional block with @@ -4150,6 +4150,8 @@ rb_f_missing(argc, argv, obj) rb_raise(rb_eArgError, "no id given"); } + rb_stack_check(); + id = SYM2ID(argv[0]); switch (TYPE(obj)) { @@ -4282,6 +4284,14 @@ stack_length(p) #endif } +void +rb_stack_check() +{ + if (stack_length(0) > STACK_LEVEL_MAX) { + rb_raise(rb_eSysStackError, "stack level too deep"); + } +} + static VALUE call_cfunc(func, recv, len, argc, argv) VALUE (*func)(); @@ -4397,9 +4407,7 @@ rb_call0(klass, recv, id, argc, argv, body, nosuper) if ((++tick & 0xff) == 0) { CHECK_INTS; /* better than nothing */ - if (stack_length(0) > STACK_LEVEL_MAX) { - rb_raise(rb_eSysStackError, "stack level too deep"); - } + rb_stack_check(); } PUSH_ITER(itr); PUSH_FRAME(); @@ -112,6 +112,7 @@ EXTERN int ruby_nerrs; VALUE rb_exc_new _((VALUE, const char*, long)); VALUE rb_exc_new2 _((VALUE, const char*)); VALUE rb_exc_new3 _((VALUE, VALUE)); +void rb_stack_check _((void)); NORETURN(void rb_loaderror __((const char*, ...))); NORETURN(void rb_name_error __((VALUE id, const char*, ...))); void rb_compile_error __((const char*, ...)); |