diff options
-rw-r--r-- | ChangeLog | 7 | ||||
-rw-r--r-- | ext/dl/dl.c | 2 | ||||
-rw-r--r-- | ext/win32ole/win32ole.c | 2 |
3 files changed, 9 insertions, 2 deletions
@@ -1,3 +1,10 @@ +Mon Jun 16 16:23:56 2003 NAKAMURA Usaku <usa@ruby-lang.org> + + * ext/dl/dl.c (rb_dl_callback): use rb_block_proc() instead of + rb_block_new(). + + * ext/win32ole/win32ole.c (ev_on_event): ditto. + Mon Jun 16 16:06:47 2003 Yukihiro Matsumoto <matz@ruby-lang.org> * eval.c (proc_alloc): re-unification of Block and Proc. Block diff --git a/ext/dl/dl.c b/ext/dl/dl.c index 7a639ac77a..22abb754d2 100644 --- a/ext/dl/dl.c +++ b/ext/dl/dl.c @@ -585,7 +585,7 @@ rb_dl_callback(int argc, VALUE argv[], VALUE self) switch (rb_scan_args(argc, argv, "11", &type, &proc)) { case 1: if (rb_block_given_p()) { - proc = rb_block_new(); + proc = rb_block_proc(); } else{ proc = Qnil; diff --git a/ext/win32ole/win32ole.c b/ext/win32ole/win32ole.c index ecffa485ea..c738063aa8 100644 --- a/ext/win32ole/win32ole.c +++ b/ext/win32ole/win32ole.c @@ -5224,7 +5224,7 @@ ev_on_event(argc, argv, self, is_ary_arg) if(!NIL_P(event)) { Check_SafeStr(event); } - data = rb_ary_new3(4, rb_block_new(), event, args, is_ary_arg); + data = rb_ary_new3(4, rb_block_proc(), event, args, is_ary_arg); add_event_call_back(self, data); return Qnil; } |