mirror of
https://github.com/ruby/ruby.git
synced 2022-11-09 12:17:21 -05:00
* string.c (sym_to_proc): caches Symbol procs, based on a patch from
Shumpei Akai <admin AT flexfrank.net>. [ruby-dev:37265] git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@20521 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
parent
bec3fed135
commit
f149326740
2 changed files with 30 additions and 2 deletions
|
@ -1,3 +1,8 @@
|
||||||
|
Fri Dec 5 00:17:18 2008 Nobuyoshi Nakada <nobu@ruby-lang.org>
|
||||||
|
|
||||||
|
* string.c (sym_to_proc): caches Symbol procs, based on a patch from
|
||||||
|
Shumpei Akai <admin AT flexfrank.net>. [ruby-dev:37265]
|
||||||
|
|
||||||
Thu Dec 4 23:29:34 2008 NAKAMURA Usaku <usa@ruby-lang.org>
|
Thu Dec 4 23:29:34 2008 NAKAMURA Usaku <usa@ruby-lang.org>
|
||||||
|
|
||||||
* win32/win32.c (waitpid): fix bug of checking child slot.
|
* win32/win32.c (waitpid): fix bug of checking child slot.
|
||||||
|
|
27
string.c
27
string.c
|
@ -6915,9 +6915,32 @@ sym_call(VALUE args, VALUE sym, int argc, VALUE *argv)
|
||||||
static VALUE
|
static VALUE
|
||||||
sym_to_proc(VALUE sym)
|
sym_to_proc(VALUE sym)
|
||||||
{
|
{
|
||||||
return rb_proc_new(sym_call, (VALUE)SYM2ID(sym));
|
static VALUE sym_proc_cache = Qfalse;
|
||||||
}
|
enum {SYM_PROC_CACHE_SIZE = 67};
|
||||||
|
VALUE proc;
|
||||||
|
long id, index;
|
||||||
|
VALUE *aryp;
|
||||||
|
|
||||||
|
if (!sym_proc_cache) {
|
||||||
|
rb_gc_register_mark_object(sym_proc_cache);
|
||||||
|
sym_proc_cache = rb_ary_new2(SYM_PROC_CACHE_SIZE * 2);
|
||||||
|
rb_ary_store(sym_proc_cache, SYM_PROC_CACHE_SIZE*2 - 1, Qnil);
|
||||||
|
}
|
||||||
|
|
||||||
|
id = SYM2ID(sym);
|
||||||
|
index = (id % SYM_PROC_CACHE_SIZE) << 1;
|
||||||
|
|
||||||
|
aryp = RARRAY_PTR(sym_proc_cache);
|
||||||
|
if (aryp[index] == sym) {
|
||||||
|
return aryp[index + 1];
|
||||||
|
}
|
||||||
|
else {
|
||||||
|
proc = rb_proc_new(sym_call, (VALUE)id);
|
||||||
|
aryp[index] = sym;
|
||||||
|
aryp[index + 1] = proc;
|
||||||
|
return proc;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
static VALUE
|
static VALUE
|
||||||
sym_succ(VALUE sym)
|
sym_succ(VALUE sym)
|
||||||
|
|
Loading…
Add table
Reference in a new issue