shyouhei	2007-09-07 14:05:36 +0900 (Fri, 07 Sep 2007)

  New Revision: 13361

  Modified files:
    branches/ruby_1_8_5/ext/tk/tcltklib.c
    branches/ruby_1_8_5/version.h

  Log:
    * ext/tk/tcltklib.c (Init_tcltklib): use rb_set_end_proc().


  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/branches/ruby_1_8_5/ext/tk/tcltklib.c?r1=13361&r2=13360
  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/branches/ruby_1_8_5/version.h?r1=13361&r2=13360

Index: ruby_1_8_5/ext/tk/tcltklib.c
===================================================================
--- ruby_1_8_5/ext/tk/tcltklib.c	(revision 13360)
+++ ruby_1_8_5/ext/tk/tcltklib.c	(revision 13361)
@@ -4364,12 +4364,11 @@
 
 
 /* finalize operation */
-static VALUE
+static void
 lib_mark_at_exit(self)
     VALUE self;
 {
     at_exit = 1;
-    return Qnil;
 }
 
 static int
@@ -7995,8 +7994,6 @@
 
     /* --------------------------------------------------------------- */
 
-    rb_define_module_function(lib, "_mark_at_exit", lib_mark_at_exit, 0);
-
     rb_define_module_function(lib, "mainloop", lib_mainloop, -1);
     rb_define_module_function(lib, "mainloop_thread?", 
                               lib_evloop_thread_p, 0);
@@ -8133,7 +8130,7 @@
 
     /* --------------------------------------------------------------- */
 
-    rb_eval_string("at_exit{ TclTkLib._mark_at_exit }");
+    rb_set_end_proc(lib_mark_at_exit, 0);
 
     /* --------------------------------------------------------------- */
 
Index: ruby_1_8_5/version.h
===================================================================
--- ruby_1_8_5/version.h	(revision 13360)
+++ ruby_1_8_5/version.h	(revision 13361)
@@ -2,7 +2,7 @@
 #define RUBY_RELEASE_DATE "2007-09-07"
 #define RUBY_VERSION_CODE 185
 #define RUBY_RELEASE_CODE 20070907
-#define RUBY_PATCHLEVEL 100
+#define RUBY_PATCHLEVEL 101
 
 #define RUBY_VERSION_MAJOR 1
 #define RUBY_VERSION_MINOR 8

--
ML: ruby-changes@q...
Info: http://www.atdot.net/~ko1/quickml