diff options
| author | Tomoyuki Sahara <[email protected]> | 2014-02-03 15:18:52 +0900 |
|---|---|---|
| committer | Tomoyuki Sahara <[email protected]> | 2014-02-03 15:18:52 +0900 |
| commit | 7bf63c28769ebccb660294a38330a6abc3a22be1 (patch) | |
| tree | 8f9064a52ce580aaa12228e1caa066fb5b54132b /src | |
| parent | 857e3cfa7cff59425eeb9c92bd4aff5494feaab0 (diff) | |
| download | mruby-7bf63c28769ebccb660294a38330a6abc3a22be1.tar.gz mruby-7bf63c28769ebccb660294a38330a6abc3a22be1.zip | |
add Float#nan?
Diffstat (limited to 'src')
| -rw-r--r-- | src/numeric.c | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/src/numeric.c b/src/numeric.c index 0b841bf70..8f9d1ba25 100644 --- a/src/numeric.c +++ b/src/numeric.c @@ -612,6 +612,12 @@ flo_truncate(mrb_state *mrb, mrb_value num) return mrb_fixnum_value((mrb_int)f); } +static mrb_value +flo_nan_p(mrb_state *mrb, mrb_value num) +{ + return mrb_bool_value(isnan(mrb_float(num))); +} + /* * Document-class: Integer * @@ -1331,4 +1337,5 @@ mrb_init_numeric(mrb_state *mrb) mrb_define_method(mrb, fl, "to_s", flo_to_s, MRB_ARGS_NONE()); /* 15.2.9.3.16(x) */ mrb_define_method(mrb, fl, "inspect", flo_to_s, MRB_ARGS_NONE()); + mrb_define_method(mrb, fl, "nan?", flo_nan_p, MRB_ARGS_NONE()); } |