Skip to content

M
mruby
Commit 80041687 authored by Yukihiro Matsumoto's avatar Yukihiro Matsumoto
Browse files
Options

readint() returns long

parent 8e574a9e
Hide whitespace changes
Inline Side-by-side
Showing with 5 additions and 4 deletions
src/codegen.c
View file @ 80041687
......@@ -12,6 +12,7 @@
#include "mruby/irep.h"
#include "mruby/proc.h"
#include "mruby/compile.h"
#include "mruby/numeric.h"
#include "opcode.h"
#include "node.h"
#include <string.h>
......@@ -1574,10 +1575,10 @@ codegen(codegen_scope *s, node *tree, int val)
if (val) {
char *p = (char*)tree->car;
int base = (intptr_t)tree->cdr->car;
int i = readint(p, base);
long i = readint(p, base);
mrb_code co;
if (i == LONG_MAX && errno == ERANGE) {
if ((i == LONG_MAX && errno == ERANGE) || !FIXABLE(i)) {
mrb_float f = readint_float(s, p, base);
int off = new_lit(s, mrb_float_value(f));
......@@ -1628,10 +1629,10 @@ codegen(codegen_scope *s, node *tree, int val)
{
char *p = (char*)tree->car;
int base = (intptr_t)tree->cdr->car;
int i = readint(p, base);
long i = readint(p, base);
mrb_code co;
if (i == LONG_MAX && errno == ERANGE) {
if ((i == LONG_MAX && errno == ERANGE) || !FIXABLE(i)) {
mrb_float f = readint_float(s, p, base);
int off = new_lit(s, mrb_float_value(-f));
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment