From 59b233e76c99bec67cbce26feb1771d64130a19e Mon Sep 17 00:00:00 2001 From: shyouhei Date: Mon, 9 Mar 2009 00:04:12 +0000 Subject: merge revision(s) 21727: * gc.c (define_final): cannot define finalizer for immediate values. [ruby-core:21500] * gc.c (define_final): freezes or hides internal values. git-svn-id: http://svn.ruby-lang.org/repos/ruby/branches/ruby_1_8_6@22832 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- ChangeLog | 7 +++++++ gc.c | 11 +++++++++-- version.h | 2 +- 3 files changed, 17 insertions(+), 3 deletions(-) diff --git a/ChangeLog b/ChangeLog index 16573c693..f3e12a445 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,10 @@ +Mon Mar 9 09:03:01 2009 Nobuyoshi Nakada + + * gc.c (define_final): cannot define finalizer for immediate + values. [ruby-core:21500] + + * gc.c (define_final): freezes or hides internal values. + Mon Mar 9 08:52:37 2009 Yukihiro Matsumoto * parse.y (IS_BEG): EXPR_CLASS should be treated like EXPR_BEG. diff --git a/gc.c b/gc.c index 7f9ad0661..51ceb3db1 100644 --- a/gc.c +++ b/gc.c @@ -1843,9 +1843,14 @@ define_final(argc, argv, os) rb_obj_classname(block)); } need_call_final = 1; - FL_SET(obj, FL_FINALIZE); + if (!FL_ABLE(obj)) { + rb_raise(rb_eArgError, "cannot define finalizer for %s", + rb_obj_classname(obj)); + } + RBASIC(obj)->flags |= FL_FINALIZE; block = rb_ary_new3(2, INT2FIX(ruby_safe_level), block); + OBJ_FREEZE(block); if (!finalizer_table) { finalizer_table = st_init_numtable(); @@ -1854,7 +1859,9 @@ define_final(argc, argv, os) rb_ary_push(table, block); } else { - st_add_direct(finalizer_table, obj, rb_ary_new3(1, block)); + table = rb_ary_new3(1, block); + RBASIC(table)->klass = 0; + st_add_direct(finalizer_table, obj, table); } return block; } diff --git a/version.h b/version.h index 776057e7f..cae459893 100644 --- a/version.h +++ b/version.h @@ -2,7 +2,7 @@ #define RUBY_RELEASE_DATE "2009-03-09" #define RUBY_VERSION_CODE 186 #define RUBY_RELEASE_CODE 20090309 -#define RUBY_PATCHLEVEL 356 +#define RUBY_PATCHLEVEL 357 #define RUBY_VERSION_MAJOR 1 #define RUBY_VERSION_MINOR 8 -- cgit