summaryrefslogtreecommitdiff
path: root/gc.h
diff options
context:
space:
mode:
authorko1 <ko1@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2006-12-31 15:02:22 (GMT)
committerko1 <ko1@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2006-12-31 15:02:22 (GMT)
commita3e1b1ce7ed7e7ffac23015fc2fde56511b30681 (patch)
tree7b725552a9a4ded93849ca2faab1b257f7761790 /gc.h
parent3e7566d8fb5138bb9cd647e5fdefc54fc9803509 (diff)
* Merge YARV
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@11439 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'gc.h')
-rw-r--r--gc.h48
1 files changed, 48 insertions, 0 deletions
diff --git a/gc.h b/gc.h
new file mode 100644
index 0000000..3b2272b
--- /dev/null
+++ b/gc.h
@@ -0,0 +1,48 @@
+
+#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);}