[ruby-dev:19881] dfree as -1

なかだです。

dfreeを-1にしたT_DATAを作ると、rb_gc_call_finalizer_at_exit()で
SEGVしてしまうのですが、dfreeが-1ならデフォルトのfree()を呼ぶと
いうのは仕様ですよね?


Index: gc.c
===================================================================
RCS file: /pub/cvs/ruby/src/ruby/gc.c,v
retrieving revision 1.48.2.34
diff -u -2 -p -r1.48.2.34 gc.c
--- gc.c	21 Feb 2003 18:12:04 -0000	1.48.2.34
+++ gc.c	23 Mar 2003 08:10:36 -0000
@@ -1358,5 +1358,10 @@ rb_gc_call_finalizer_at_exit()
 		DATA_PTR(p) && RANY(p)->as.data.dfree) {
 		p->as.free.flag = 0;
-		(*RANY(p)->as.data.dfree)(DATA_PTR(p));
+		if ((long)RANY(obj)->as.data.dfree == -1) {
+		    RUBY_CRITICAL(free(DATA_PTR(obj)));
+		}
+		else if (RANY(obj)->as.data.dfree) {
+		    (*RANY(obj)->as.data.dfree)(DATA_PTR(p));
+		}
 	    }
 	    else if (BUILTIN_TYPE(p) == T_FILE) {


-- 
--- 僕の前にBugはない。
--- 僕の後ろにBugはできる。
    中田 伸悦