diff options
| author | KOBAYASHI Shuji <[email protected]> | 2019-05-23 13:40:49 +0900 |
|---|---|---|
| committer | KOBAYASHI Shuji <[email protected]> | 2019-05-23 13:40:49 +0900 |
| commit | 48903850e9041e74c526fef5e63857007d2cac38 (patch) | |
| tree | b291e8179877550f44703894900db36b30f3e27a /mrbgems/mruby-rational | |
| parent | 5f4eb87735c8c084fdb6b98df1eed0663e18b9d2 (diff) | |
| download | mruby-48903850e9041e74c526fef5e63857007d2cac38.tar.gz mruby-48903850e9041e74c526fef5e63857007d2cac38.zip | |
Freeze `Rational` and `Complex` objects
Diffstat (limited to 'mrbgems/mruby-rational')
| -rw-r--r-- | mrbgems/mruby-rational/src/rational.c | 1 | ||||
| -rw-r--r-- | mrbgems/mruby-rational/test/rational.rb | 6 |
2 files changed, 7 insertions, 0 deletions
diff --git a/mrbgems/mruby-rational/src/rational.c b/mrbgems/mruby-rational/src/rational.c index 2a3f6df09..fa061c0b8 100644 --- a/mrbgems/mruby-rational/src/rational.c +++ b/mrbgems/mruby-rational/src/rational.c @@ -37,6 +37,7 @@ rational_new(mrb_state *mrb, mrb_int numerator, mrb_int denominator) struct mrb_rational *p = rational_ptr(rat); p->numerator = numerator; p->denominator = denominator; + MRB_SET_FROZEN_FLAG(s); return rat; } diff --git a/mrbgems/mruby-rational/test/rational.rb b/mrbgems/mruby-rational/test/rational.rb index 914f8505e..1ed3b3a07 100644 --- a/mrbgems/mruby-rational/test/rational.rb +++ b/mrbgems/mruby-rational/test/rational.rb @@ -278,3 +278,9 @@ assert 'Rational#negative?' do assert_not_predicate(Rational(2,3), :negative?) assert_not_predicate(Rational(0), :negative?) end + +assert 'Rational#frozen?' do + assert_predicate(1r, :frozen?) + assert_predicate(Rational(2,3), :frozen?) + assert_predicate(4/5r, :frozen?) +end |