kotovalexarian-likes-github/ruby--ruby
1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00
Code Releases Activity

RBasci::flags (VALUE) doesn't match int.

Browse source 
The type of RBasic::flags is VALUE, and INT2FIX(flags) does not
make sense. Use correct type to represent.
This commit is contained in:
Koichi Sasada 2020-07-15 13:34:54 +09:00
parent dfe88350df
commit c25d249e63
1 changed files with 17 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

23
spec/ruby/optional/capi/ext/rbasic_spec.c
View file

@ -7,23 +7,34 @@ extern "C" {
static const VALUE VISIBLE_BITS = FL_TAINT | FL_FREEZE | ~(FL_USER0 - 1);
#if SIZEOF_VALUE == SIZEOF_LONG
#define VALUE2NUM(v) ULONG2NUM(v)
#define NUM2VALUE(n) NUM2ULONG(n)
#elif SIZEOF_VALUE == SIZEOF_LONG_LONG
#define VALUE2NUM(v) ULL2NUM(v)
#define NUM2VALUE(n) NUM2ULL(n)
#else
#error "unsupported"
#endif
VALUE rbasic_spec_taint_flag(VALUE self) {
return INT2FIX(RUBY_FL_TAINT);
return VALUE2NUM(RUBY_FL_TAINT);
}
VALUE rbasic_spec_freeze_flag(VALUE self) {
return INT2FIX(RUBY_FL_FREEZE);
return VALUE2NUM(RUBY_FL_FREEZE);
}
static VALUE spec_get_flags(const struct RBasic *b) {
VALUE flags = b->flags & VISIBLE_BITS;
return INT2FIX(flags);
return VALUE2NUM(flags);
}
static VALUE spec_set_flags(struct RBasic *b, VALUE flags) {
flags &= VISIBLE_BITS;
b->flags = (b->flags & ~VISIBLE_BITS) | flags;
return INT2FIX(flags);
return VALUE2NUM(flags);
}
VALUE rbasic_spec_get_flags(VALUE self, VALUE val) {
@ -31,7 +42,7 @@ VALUE rbasic_spec_get_flags(VALUE self, VALUE val) {
}
VALUE rbasic_spec_set_flags(VALUE self, VALUE val, VALUE flags) {
return spec_set_flags(RBASIC(val), FIX2INT(flags));
return spec_set_flags(RBASIC(val), NUM2VALUE(flags));
}
VALUE rbasic_spec_copy_flags(VALUE self, VALUE to, VALUE from) {
@ -47,7 +58,7 @@ VALUE rbasic_rdata_spec_get_flags(VALUE self, VALUE structure) {
}
VALUE rbasic_rdata_spec_set_flags(VALUE self, VALUE structure, VALUE flags) {
return spec_set_flags(&RDATA(structure)->basic, FIX2INT(flags));
return spec_set_flags(&RDATA(structure)->basic, NUM2VALUE(flags));
}
VALUE rbasic_rdata_spec_copy_flags(VALUE self, VALUE to, VALUE from) {