From acdc2d1f242f2547ca842be5d62a2b06356b39ea Mon Sep 17 00:00:00 2001 From: YAMAMOTO Masaya Date: Wed, 11 Oct 2017 17:53:17 +0900 Subject: Add MRB_WITHOUT_FLOAT --- src/class.c | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'src/class.c') diff --git a/src/class.c b/src/class.c index f220106cd..33d6d7b92 100644 --- a/src/class.c +++ b/src/class.c @@ -804,6 +804,7 @@ mrb_get_args(mrb_state *mrb, const char *format, ...) } } break; +#ifndef MRB_WITHOUT_FLOAT case 'f': { mrb_float *p; @@ -816,6 +817,7 @@ mrb_get_args(mrb_state *mrb, const char *format, ...) } } break; +#endif case 'i': { mrb_int *p; @@ -826,6 +828,7 @@ mrb_get_args(mrb_state *mrb, const char *format, ...) case MRB_TT_FIXNUM: *p = mrb_fixnum(ARGV[arg_i]); break; +#ifndef MRB_WITHOUT_FLOAT case MRB_TT_FLOAT: { mrb_float f = mrb_float(ARGV[arg_i]); @@ -836,6 +839,7 @@ mrb_get_args(mrb_state *mrb, const char *format, ...) *p = (mrb_int)f; } break; +#endif case MRB_TT_STRING: mrb_raise(mrb, E_TYPE_ERROR, "no implicit conversion of String into Integer"); break; @@ -1277,9 +1281,11 @@ mrb_singleton_class(mrb_state *mrb, mrb_value v) return mrb_obj_value(mrb->object_class); case MRB_TT_SYMBOL: case MRB_TT_FIXNUM: +#ifndef MRB_WITHOUT_FLOAT case MRB_TT_FLOAT: mrb_raise(mrb, E_TYPE_ERROR, "can't define singleton"); return mrb_nil_value(); /* not reached */ +#endif default: break; } -- cgit v1.2.3