45 if (level < debug_level) {
46 fprintf(stderr,
"%*s", indent_level,
"");
58 vfprintf(stderr, format, ap);
67 if (level < debug_level) {
71 fprintf(stderr,
"DBG> %s: %s\n", header, buff);
86 if (level < debug_level) {
87 fprintf(stderr,
"DBG> %s: %s\n", header,
rb_id2name(
id));
96 if (level < debug_level) {
97 fprintf(stderr,
"DBG> %s: %s (%u)\n", header,
112 #if defined _WIN32 && RUBY_MSVCRT_VERSION >= 80 113 extern int ruby_w32_rtc_error;
115 #define SET_WHEN(name, var, val) do { \ 116 if (len == sizeof(name) - 1 && \ 117 strncmp(str, (name), len) == 0) { \ 124 #if defined _WIN32 && RUBY_MSVCRT_VERSION >= 80 125 SET_WHEN(
"rtc_error", ruby_w32_rtc_error, 1);
127 fprintf(stderr,
"unexpected debug option: %.*s\n", len, str);
VALUE ruby_debug_print_value(int level, int debug_level, const char *header, VALUE obj)
enum ruby_method_ids method_ids
enum ruby_econv_flag_type econv_flag_types
void ruby_each_words(const char *, void(*)(const char *, int, void *), void *)
#define SET_WHEN(name, var, val)
enum ruby_tag_type tag_type
void ruby_debug_printf(const char *format,...)
#define ruby_enable_coredump
int ruby_debug_print_indent(int level, int debug_level, int indent_level)
enum ruby_id_types id_types
const SIGNED_VALUE RUBY_NODE_LMASK
VALUE * ruby_initial_gc_stress_ptr
const char * rb_id2name(ID)
enum ruby_encoding_consts encoding_consts
void ruby_set_debug_option(const char *str)
register unsigned int len
enum ruby_coderange_type enc_coderange_types
const union @3 ruby_dummy_gdb_enums
NODE * ruby_debug_print_node(int level, int debug_level, const char *header, const NODE *node)
const char * ruby_node_name(int node)
enum ruby_special_consts special_consts
enum ruby_value_type value_type
void ruby_debug_print_v(VALUE v)
static void set_debug_option(const char *str, int len, void *arg)
const char * rb_raw_obj_info(char *buff, const int buff_size, VALUE obj)
void ruby_debug_breakpoint(void)
enum ruby_fl_type fl_types
ID ruby_debug_print_id(int level, int debug_level, const char *header, ID id)