admin/mruby-mruby
1
0
Fork 0
mirror of https://github.com/mruby/mruby synced 2026-06-08 16:11:16 +00:00
Code Issues Packages Projects Releases Wiki Activity

proper irep pool duplication check for strings

Browse Source
This commit is contained in:
Yukihiro Matz Matsumoto
2013-03-05 00:34:23 +09:00
parent 6be56ef1fb
commit aa98c575f5
1 changed files with 20 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/codegen.c
+20 -2
View File
@@ -410,9 +410,27 @@ new_lit(codegen_scope *s, mrb_value val)
{
int i;
for (i=0; i<s->irep->plen; i++) {
if (mrb_obj_equal(s->mrb, s->irep->pool[i], val)) return i;
switch (mrb_type(val)) {
case MRB_TT_STRING:
for (i=0; i<s->irep->plen; i++) {
mrb_value pv = s->irep->pool[i];
mrb_int len;
if (mrb_type(pv) != MRB_TT_STRING) continue;
if ((len = RSTRING_LEN(pv)) != RSTRING_LEN(val)) continue;
if (memcmp(RSTRING_PTR(pv), RSTRING_PTR(val), len) == 0)
return i;
}
break;
case MRB_TT_FLOAT:
default:
for (i=0; i<s->irep->plen; i++) {
if (mrb_obj_equal(s->mrb, s->irep->pool[i], val)) return i;
}
break;
}
if (s->irep->plen == s->pcapa) {
s->pcapa *= 2;
s->irep->pool = (mrb_value *)codegen_realloc(s, s->irep->pool, sizeof(mrb_value)*s->pcapa);