1berry/ruby
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Add write-barrier in tally

Browse Source
This commit is contained in:
Nobuyoshi Nakada 2021-03-20 23:53:57 +09:00
parent 0b6554e65b
commit cfadbf2fc4
No known key found for this signature in database
GPG Key ID: 7CD2805BFA3770C6
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
enum.c
View File

@ -1012,6 +1012,7 @@ static int
tally_up(st_data_t *group, st_data_t *value, st_data_t arg, int existing)
{
VALUE tally = (VALUE)*value;
VALUE hash = (VALUE)arg;
if (!existing) {
tally = INT2FIX(1);
}
@ -1020,15 +1021,17 @@ tally_up(st_data_t *group, st_data_t *value, st_data_t arg, int existing)
}
else {
tally = rb_big_plus(tally, INT2FIX(1));
RB_OBJ_WRITTEN(hash, Qundef, tally);
}
*value = (st_data_t)tally;
if (!SPECIAL_CONST_P(*group)) RB_OBJ_WRITTEN(hash, Qundef, *group);
return ST_CONTINUE;
}
static VALUE
rb_enum_tally_up(VALUE hash, VALUE group)
{
rb_hash_stlike_update(hash, group, tally_up, 0);
rb_hash_stlike_update(hash, group, tally_up, (st_data_t)hash);
return hash;
}