From b86c04ff1366bf9fb4cba49de3bb6bd68299171a Mon Sep 17 00:00:00 2001 From: nobu Date: Sun, 23 Mar 2003 10:55:39 +0000 Subject: * gc.c (rb_gc_call_finalizer_at_exit): use free() if dfree is -1. git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@3600 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- gc.c | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) (limited to 'gc.c') diff --git a/gc.c b/gc.c index 74ea83eac..6789c0d18 100644 --- a/gc.c +++ b/gc.c @@ -1547,7 +1547,12 @@ rb_gc_call_finalizer_at_exit() if (BUILTIN_TYPE(p) == T_DATA && DATA_PTR(p) && RANY(p)->as.data.dfree) { p->as.free.flags = 0; - (*RANY(p)->as.data.dfree)(DATA_PTR(p)); + if ((long)RANY(p)->as.data.dfree == -1) { + RUBY_CRITICAL(free(DATA_PTR(p))); + } + else if (RANY(p)->as.data.dfree) { + (*RANY(p)->as.data.dfree)(DATA_PTR(p)); + } } else if (BUILTIN_TYPE(p) == T_FILE) { p->as.free.flags = 0; -- cgit