From 83c917df38d6edbcbe7a220d21ed2e8d3a97b1d6 Mon Sep 17 00:00:00 2001 From: nobu Date: Wed, 16 Jun 2004 07:01:32 +0000 Subject: * gc.c (stack_grow_direction): memoize the direction. * gc.c (Init_stack): should always move to end of VALUE. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@6461 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- gc.c | 11 +++++++---- 1 file changed, 7 insertions(+), 4 deletions(-) (limited to 'gc.c') diff --git a/gc.c b/gc.c index def4acb3bb..a364b33268 100644 --- a/gc.c +++ b/gc.c @@ -447,15 +447,17 @@ static unsigned int STACK_LEVEL_MAX = 655300; #elif STACK_GROW_DIRECTION < 0 # define STACK_UPPER(x, a, b) b #else +static int grow_direction; static int -stack_growup_p(addr) +stack_grow_direction(addr) VALUE *addr; { SET_STACK_END; - if (STACK_END > addr) return Qtrue; - return Qfalse; + if (STACK_END > addr) return grow_direction = 1; + return grow_direction = -1; } +# define stack_growup_p(x) ((grow_direction ? grow_direction : stack_grow_direction(x)) > 0) # define STACK_UPPER(x, a, b) (stack_growup_p(x) ? a : b) #endif @@ -1410,10 +1412,11 @@ Init_stack(addr) rb_gc_stack_start = _SEND; #else if (!addr) addr = (VALUE *)&addr; + STACK_UPPER(&addr, addr, ++addr); if (rb_gc_stack_start) { if (STACK_UPPER(&addr, rb_gc_stack_start > addr, - rb_gc_stack_start < ++addr)) + rb_gc_stack_start < addr)) rb_gc_stack_start = addr; return; } -- cgit v1.2.3