diff options
Diffstat (limited to 'src/load.c')
| -rw-r--r-- | src/load.c | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/src/load.c b/src/load.c index 58427424d..3a6ce7cca 100644 --- a/src/load.c +++ b/src/load.c @@ -126,9 +126,10 @@ read_irep_record_1(mrb_state *mrb, const uint8_t *bin, size_t *len, uint8_t flag } src += pool_data_len; switch (tt) { /* pool data */ - case IREP_TT_FIXNUM: - irep->pool[i] = mrb_str_to_inum(mrb, s, 10, FALSE); - break; + case IREP_TT_FIXNUM: { + mrb_value num = mrb_str_to_inum(mrb, s, 10, FALSE); + irep->pool[i] = mrb_float_p(num)? mrb_float_pool(mrb, mrb_float(num)) : num; + } break; #ifndef MRB_WITHOUT_FLOAT case IREP_TT_FLOAT: |