juretta / ruby fork watch download tarball
public
Description: ruby lang (www.ruby-lang.org) svn mirror | Updated every 15 minutes
Homepage: http://svn.ruby-lang.org/repos/ruby/
Clone URL: git://github.com/juretta/ruby.git 
  * Merge YARV
ko1 (author)
Sun Dec 31 07:02:22 -0800 2006
commit  4ef881bd15c9c4e2e9b20da2c091e80d4d530119
tree    7b725552a9a4ded93849ca2faab1b257f7761790
parent  182520b0acc5eea4da52bc8734dc5e3280ce5f94
ruby / gc.h
100644 49 lines (40 sloc) 1.09 kb
raw blame history 
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

 
#ifndef MARK_FREE_DEBUG
#define MARK_FREE_DEBUG 0
#endif
 
 
#if MARK_FREE_DEBUG
static int g_indent = 0;
 
static void
rb_gc_debug_indent(void)
{
    int i;
    for (i = 0; i < g_indent; i++) {
  printf(" ");
    }
}
 
static void
rb_gc_debug_body(char *mode, char *msg, int st, void *ptr)
{
    if (st == 0) {
  g_indent--;
    }
    rb_gc_debug_indent();
    printf("%s: %s %s (%p)\n", mode, st ? "->" : "<-", msg, ptr);
    if (st) {
  g_indent++;
    }
    fflush(stdout);
}
 
#define MARK_REPORT_ENTER(msg) rb_gc_debug_body("mark", msg, 1, ptr)
#define MARK_REPORT_LEAVE(msg) rb_gc_debug_body("mark", msg, 0, ptr)
#define FREE_REPORT_ENTER(msg) rb_gc_debug_body("free", msg, 1, ptr)
#define FREE_REPORT_LEAVE(msg) rb_gc_debug_body("free", msg, 0, ptr)
#define GC_INFO                rb_gc_debug_indent(); printf
 
#else
#define MARK_REPORT_ENTER(msg)
#define MARK_REPORT_LEAVE(msg)
#define FREE_REPORT_ENTER(msg)
#define FREE_REPORT_LEAVE(msg)
#define GC_INFO if(0)printf
#endif
 
#define MARK_UNLESS_NULL(ptr) if(ptr){rb_gc_mark(ptr);}
#define FREE_UNLESS_NULL(ptr) if(ptr){ruby_xfree(ptr);}