From 9ac386923d6a2dc62b5ec61fa8bcbc2f1f551be9 Mon Sep 17 00:00:00 2001
From: "Yukihiro \"Matz\" Matsumoto" <matz@ruby-lang.org>
Date: Wed, 27 Nov 2013 17:29:28 +0900
Subject: float objects in pool are objects when MRB_WORD_BOXING is set

---
 src/etc.c | 10 ++++++++++
 1 file changed, 10 insertions(+)

(limited to 'src/etc.c')

diff --git a/src/etc.c b/src/etc.c
index 70b22cfc4..82394891f 100644
--- a/src/etc.c
+++ b/src/etc.c
@@ -198,6 +198,16 @@ mrb_float_value(mrb_state *mrb, mrb_float f)
   return v;
 }
 
+mrb_value
+mrb_float_pool(mrb_state *mrb, mrb_float f)
+{
+  struct RFloat *nf = (struct RFloat *)mrb_malloc(mrb, sizeof(struct RFloat));
+  nf->tt = MRB_TT_FLOAT;
+  nf->c = mrb->float_class;
+  nf->f = f;
+  return mrb_obj_value(nf);
+}
+
 mrb_value
 mrb_cptr_value(mrb_state *mrb, void *p)
 {
-- 
cgit v1.2.3