5 #if defined(__x86_64__) && !defined(_ILP32) && defined(__GNUC__) && !defined(__native_client__) 6 #define SET_MACHINE_STACK_END(p) __asm__ __volatile__ ("movq\t%%rsp, %0" : "=r" (*(p))) 7 #elif defined(__i386) && defined(__GNUC__) && !defined(__native_client__) 8 #define SET_MACHINE_STACK_END(p) __asm__ __volatile__ ("movl\t%%esp, %0" : "=r" (*(p))) 11 #define SET_MACHINE_STACK_END(p) rb_gc_set_stack_end(p) 12 #define USE_CONSERVATIVE_STACK_END 17 #ifndef RUBY_MARK_FREE_DEBUG 18 #define RUBY_MARK_FREE_DEBUG 0 21 #if RUBY_MARK_FREE_DEBUG 25 rb_gc_debug_indent(
void)
31 rb_gc_debug_body(
const char *mode,
const char *
msg,
int st,
void *ptr)
37 printf(
"%s: %s %s (%p)\n", mode, st ?
"->" :
"<-",
msg, ptr);
46 #define RUBY_MARK_ENTER(msg) rb_gc_debug_body("mark", (msg), 1, ptr) 47 #define RUBY_MARK_LEAVE(msg) rb_gc_debug_body("mark", (msg), 0, ptr) 48 #define RUBY_FREE_ENTER(msg) rb_gc_debug_body("free", (msg), 1, ptr) 49 #define RUBY_FREE_LEAVE(msg) rb_gc_debug_body("free", (msg), 0, ptr) 50 #define RUBY_GC_INFO rb_gc_debug_indent(); printf 53 #define RUBY_MARK_ENTER(msg) 54 #define RUBY_MARK_LEAVE(msg) 55 #define RUBY_FREE_ENTER(msg) 56 #define RUBY_FREE_LEAVE(msg) 57 #define RUBY_GC_INFO if(0)printf 60 #define RUBY_MARK_UNLESS_NULL(ptr) if(RTEST(ptr)){rb_gc_mark(ptr);} 61 #define RUBY_FREE_UNLESS_NULL(ptr) if(ptr){ruby_xfree(ptr);(ptr)=NULL;} 63 #if STACK_GROW_DIRECTION > 0 64 # define STACK_UPPER(x, a, b) (a) 65 #elif STACK_GROW_DIRECTION < 0 66 # define STACK_UPPER(x, a, b) (b) 70 # define stack_growup_p(x) ( \ 71 (ruby_stack_grow_direction ? \ 72 ruby_stack_grow_direction : \ 73 ruby_get_stack_grow_direction(x)) > 0) 74 # define STACK_UPPER(x, a, b) (stack_growup_p(x) ? (a) : (b)) 77 #if STACK_GROW_DIRECTION 78 #define STACK_GROW_DIR_DETECTION 79 #define STACK_DIR_UPPER(a,b) STACK_UPPER(0, (a), (b)) 81 #define STACK_GROW_DIR_DETECTION VALUE stack_grow_dir_detection 82 #define STACK_DIR_UPPER(a,b) STACK_UPPER(&stack_grow_dir_detection, (a), (b)) 84 #define IS_STACK_DIR_UPPER() STACK_DIR_UPPER(1,0) 96 int (*
callback)(
void *start,
void *end,
size_t stride,
void *data),
int ruby_get_stack_grow_direction(volatile VALUE *addr)
SSL_METHOD *(* func)(void)
NOINLINE(void rb_gc_set_stack_end(VALUE **stack_end_p))
void callback(ffi_cif *cif, void *resp, void **args, void *ctx)
void rb_objspace_reachable_objects_from_root(void(func)(const char *category, VALUE, void *), void *data)
RUBY_EXTERN int ruby_stack_grow_direction
#define RUBY_SYMBOL_EXPORT_END
#define RUBY_SYMBOL_EXPORT_BEGIN
void rb_gc_set_stack_end(VALUE **stack_end_p)
RUBY_SYMBOL_EXPORT_BEGIN size_t rb_objspace_data_type_memsize(VALUE obj)
void rb_objspace_each_objects(int(*callback)(void *start, void *end, size_t stride, void *data), void *data)
int rb_objspace_internal_object_p(VALUE obj)
int rb_objspace_markable_object_p(VALUE obj)
void rb_objspace_reachable_objects_from(VALUE obj, void(func)(VALUE, void *), void *data)