1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
|
/**********************************************************************
debug.h - YARV Debug function interface
$Author$
$Date$
created at: 04/08/25 02:33:49 JST
Copyright (C) 2004-2006 Koichi Sasada
**********************************************************************/
#ifndef _DEBUG_H_INCLUDED_
#define _DEBUG_H_INCLUDED_
#include <ruby.h>
#include <node.h>
#define dpv(h,v) ruby_debug_value(-1, 0, h, v)
#define dp(v) ruby_debug_value(-1, 0, "", v)
#define dpi(i) ruby_debug_id(-1, 0, "", i)
#define bp() ruby_debug_breakpoint()
#define dpn(n) ruby_debug_node(-1, 0, "", n)
VALUE ruby_debug_value(int level, int debug_level, char *header, VALUE v);
ID ruby_debug_id(int level, int debug_level, char *header, ID id);
NODE *ruby_debug_node(int level, int debug_level, char *header, NODE *node);
void ruby_debug_indent(int level, int debug_level, int indent_level);
void ruby_debug_breakpoint(void);
void ruby_debug_gc_check_func(void);
#if GCDEBUG == 1
#define GC_CHECK() \
gc_check_func()
#elif GCDEBUG == 2
#define GC_CHECK() \
(printf("** %s:%d gc start\n", __FILE__, __LINE__), \
ruby_debug_gc_check_func(), \
printf("** end\n"))
#else
#define GC_CHECK()
#endif
#endif /* _DEBUG_H_INCLUDED_ */
|
