diff --git a/ext/openssl/ossl_bn.c b/ext/openssl/ossl_bn.c index ea19914c5..8abf0cc90 100644 --- a/ext/openssl/ossl_bn.c +++ b/ext/openssl/ossl_bn.c @@ -37,7 +37,7 @@ static const rb_data_type_t ossl_bn_type = { { 0, ossl_bn_free, }, - 0, 0, RUBY_TYPED_FREE_IMMEDIATELY | RUBY_TYPED_WB_PROTECTED, + 0, 0, RUBY_TYPED_FREE_IMMEDIATELY | RUBY_TYPED_WB_PROTECTED | RUBY_TYPED_FROZEN_SHAREABLE, }; /* @@ -689,6 +689,7 @@ BIGNUM_3c(mod_exp) ossl_bn_##func(VALUE self, VALUE bit) \ { \ BIGNUM *bn; \ + rb_check_frozen(self); \ GetBN(self, bn); \ if (BN_##func(bn, NUM2INT(bit)) <= 0) { \ ossl_raise(eBNError, NULL); \ @@ -778,6 +779,7 @@ BIGNUM_SHIFT(rshift) { \ BIGNUM *bn; \ int b; \ + rb_check_frozen(self); \ b = NUM2INT(bits); \ GetBN(self, bn); \ if (BN_##func(bn, bn, b) <= 0) \ @@ -1187,6 +1189,7 @@ ossl_bn_set_flags(VALUE self, VALUE arg) BIGNUM *bn; GetBN(self, bn); + rb_check_frozen(self); BN_set_flags(bn, NUM2INT(arg)); return Qnil; }