From 51e7fc687e6d66d02b37550ca1dd005247bc715f Mon Sep 17 00:00:00 2001 From: usa Date: Mon, 16 Jun 2003 07:25:38 +0000 Subject: * ext/dl/dl.c (rb_dl_callback): use rb_block_proc() instead of rb_block_new(). * ext/win32ole/win32ole.c (ev_on_event): ditto. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@3949 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- ext/dl/dl.c | 2 +- ext/win32ole/win32ole.c | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) (limited to 'ext') 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; } -- cgit v1.2.3