Add MRB_WORD_BOXING mode (represent mrb_value as a word)

1 files changed, 30 insertions, 30 deletions

diff --git a/mrbgems/mruby-math/src/math.c b/mrbgems/mruby-math/src/math.c
index 561d80178..bf3c007b4 100644
--- a/mrbgems/mruby-math/src/math.c
+++ b/mrbgems/mruby-math/src/math.c
@@ -108,7 +108,7 @@ math_sin(mrb_state *mrb, mrb_value obj)
   mrb_get_args(mrb, "f", &x);
   x = sin(x);
 
-  return mrb_float_value(x);
+  return mrb_float_value(mrb, x);
 }
 
 /*
@@ -126,7 +126,7 @@ math_cos(mrb_state *mrb, mrb_value obj)
   mrb_get_args(mrb, "f", &x);
   x = cos(x);
 
-  return mrb_float_value(x);
+  return mrb_float_value(mrb, x);
 }
 
 /*
@@ -143,7 +143,7 @@ math_tan(mrb_state *mrb, mrb_value obj)
   mrb_get_args(mrb, "f", &x);
   x = tan(x);
 
-  return mrb_float_value(x);
+  return mrb_float_value(mrb, x);
 }
 
 /*
@@ -164,7 +164,7 @@ math_asin(mrb_state *mrb, mrb_value obj)
   mrb_get_args(mrb, "f", &x);
   x = asin(x);
 
-  return mrb_float_value(x);
+  return mrb_float_value(mrb, x);
 }
 
 /*
@@ -181,7 +181,7 @@ math_acos(mrb_state *mrb, mrb_value obj)
   mrb_get_args(mrb, "f", &x);
   x = acos(x);
 
-  return mrb_float_value(x);
+  return mrb_float_value(mrb, x);
 }
 
 /*
@@ -198,7 +198,7 @@ math_atan(mrb_state *mrb, mrb_value obj)
   mrb_get_args(mrb, "f", &x);
   x = atan(x);
 
-  return mrb_float_value(x);
+  return mrb_float_value(mrb, x);
 }
 
 /*
@@ -228,7 +228,7 @@ math_atan2(mrb_state *mrb, mrb_value obj)
   mrb_get_args(mrb, "ff", &x, &y);
   x = atan2(x, y);
 
-  return mrb_float_value(x);
+  return mrb_float_value(mrb, x);
 }
 
 
@@ -251,7 +251,7 @@ math_sinh(mrb_state *mrb, mrb_value obj)
   mrb_get_args(mrb, "f", &x);
   x = sinh(x);
 
-  return mrb_float_value(x);
+  return mrb_float_value(mrb, x);
 }
 
 /*
@@ -268,7 +268,7 @@ math_cosh(mrb_state *mrb, mrb_value obj)
   mrb_get_args(mrb, "f", &x);
   x = cosh(x);
 
-  return mrb_float_value(x);
+  return mrb_float_value(mrb, x);
 }
 
 /*
@@ -286,7 +286,7 @@ math_tanh(mrb_state *mrb, mrb_value obj)
   mrb_get_args(mrb, "f", &x);
   x = tanh(x);
 
-  return mrb_float_value(x);
+  return mrb_float_value(mrb, x);
 }
 
 
@@ -309,7 +309,7 @@ math_asinh(mrb_state *mrb, mrb_value obj)
 
   x = asinh(x);
 
-  return mrb_float_value(x);
+  return mrb_float_value(mrb, x);
 }
 
 /*
@@ -326,7 +326,7 @@ math_acosh(mrb_state *mrb, mrb_value obj)
   mrb_get_args(mrb, "f", &x);
   x = acosh(x);
 
-  return mrb_float_value(x);
+  return mrb_float_value(mrb, x);
 }
 
 /*
@@ -343,7 +343,7 @@ math_atanh(mrb_state *mrb, mrb_value obj)
   mrb_get_args(mrb, "f", &x);
   x = atanh(x);
 
-  return mrb_float_value(x);
+  return mrb_float_value(mrb, x);
 }
 
 /*
@@ -389,7 +389,7 @@ math_exp(mrb_state *mrb, mrb_value obj)
   mrb_get_args(mrb, "f", &x);
   x = exp(x);
 
-  return mrb_float_value(x);
+  return mrb_float_value(mrb, x);
 }
 
 /*
@@ -418,7 +418,7 @@ math_log(mrb_state *mrb, mrb_value obj)
   if (argc == 2) {
     x /= log(base);
   }
-  return mrb_float_value(x);
+  return mrb_float_value(mrb, x);
 }
 
 /*
@@ -441,7 +441,7 @@ math_log2(mrb_state *mrb, mrb_value obj)
   mrb_get_args(mrb, "f", &x);
   x = log2(x);
 
-  return mrb_float_value(x);
+  return mrb_float_value(mrb, x);
 }
 
 /*
@@ -463,7 +463,7 @@ math_log10(mrb_state *mrb, mrb_value obj)
   mrb_get_args(mrb, "f", &x);
   x = log10(x);
 
-  return mrb_float_value(x);
+  return mrb_float_value(mrb, x);
 }
 
 /*
@@ -481,7 +481,7 @@ math_sqrt(mrb_state *mrb, mrb_value obj)
   mrb_get_args(mrb, "f", &x);
   x = sqrt(x);
 
-  return mrb_float_value(x);
+  return mrb_float_value(mrb, x);
 }
 
 
@@ -524,7 +524,7 @@ math_cbrt(mrb_state *mrb, mrb_value obj)
   mrb_get_args(mrb, "f", &x);
   x = cbrt(x);
 
-  return mrb_float_value(x);
+  return mrb_float_value(mrb, x);
 }
 
 
@@ -548,7 +548,7 @@ math_frexp(mrb_state *mrb, mrb_value obj)
   mrb_get_args(mrb, "f", &x);
   x = frexp(x, &exp);
 
-  return mrb_assoc_new(mrb, mrb_float_value(x), mrb_fixnum_value(exp));
+  return mrb_assoc_new(mrb, mrb_float_value(mrb, x), mrb_fixnum_value(exp));
 }
 
 /*
@@ -569,7 +569,7 @@ math_ldexp(mrb_state *mrb, mrb_value obj)
   mrb_get_args(mrb, "fi", &x, &i);
   x = ldexp(x, i);
 
-  return mrb_float_value(x);
+  return mrb_float_value(mrb, x);
 }
 
 /*
@@ -589,7 +589,7 @@ math_hypot(mrb_state *mrb, mrb_value obj)
   mrb_get_args(mrb, "ff", &x, &y);
   x = hypot(x, y);
 
-  return mrb_float_value(x);
+  return mrb_float_value(mrb, x);
 }
 
 /*
@@ -606,7 +606,7 @@ math_erf(mrb_state *mrb, mrb_value obj)
   mrb_get_args(mrb, "f", &x);
   x = erf(x);
 
-  return mrb_float_value(x);
+  return mrb_float_value(mrb, x);
 }
 
 
@@ -624,7 +624,7 @@ math_erfc(mrb_state *mrb, mrb_value obj)
   mrb_get_args(mrb, "f", &x);
   x = erfc(x);
 
-  return mrb_float_value(x);
+  return mrb_float_value(mrb, x);
 }
 
 /* ------------------------------------------------------------------------*/
@@ -635,21 +635,21 @@ mrb_mruby_math_gem_init(mrb_state* mrb)
   mrb_math = mrb_define_module(mrb, "Math");
 
 #ifdef M_PI
-  mrb_define_const(mrb, mrb_math, "PI", mrb_float_value(M_PI));
+  mrb_define_const(mrb, mrb_math, "PI", mrb_float_value(mrb, M_PI));
 #else
-  mrb_define_const(mrb, mrb_math, "PI", mrb_float_value(atan(1.0)*4.0));
+  mrb_define_const(mrb, mrb_math, "PI", mrb_float_value(mrb, atan(1.0)*4.0));
 #endif
 
 #ifdef M_E
-  mrb_define_const(mrb, mrb_math, "E", mrb_float_value(M_E));
+  mrb_define_const(mrb, mrb_math, "E", mrb_float_value(mrb, M_E));
 #else
-  mrb_define_const(mrb, mrb_math, "E", mrb_float_value(exp(1.0)));
+  mrb_define_const(mrb, mrb_math, "E", mrb_float_value(mrb, exp(1.0)));
 #endif
 
 #ifdef MRB_USE_FLOAT
-  mrb_define_const(mrb, mrb_math, "TOLERANCE", mrb_float_value(1e-5));
+  mrb_define_const(mrb, mrb_math, "TOLERANCE", mrb_float_value(mrb, 1e-5));
 #else
-  mrb_define_const(mrb, mrb_math, "TOLERANCE", mrb_float_value(1e-12));
+  mrb_define_const(mrb, mrb_math, "TOLERANCE", mrb_float_value(mrb, 1e-12));
 #endif
 
   mrb_define_module_function(mrb, mrb_math, "sin", math_sin, MRB_ARGS_REQ(1));