summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
-rw-r--r--mrbgems/mruby-io/src/file.c4
-rw-r--r--mrbgems/mruby-io/src/io.c20
-rw-r--r--mrbgems/mruby-pack/src/pack.c2
3 files changed, 16 insertions, 10 deletions
diff --git a/mrbgems/mruby-io/src/file.c b/mrbgems/mruby-io/src/file.c
index bcfd42408..4f9af10af 100644
--- a/mrbgems/mruby-io/src/file.c
+++ b/mrbgems/mruby-io/src/file.c
@@ -305,9 +305,9 @@ mrb_file_flock(mrb_state *mrb, mrb_value self)
int fd;
mrb_get_args(mrb, "i", &operation);
- fd = mrb_fixnum(mrb_io_fileno(mrb, self));
+ fd = (int)mrb_fixnum(mrb_io_fileno(mrb, self));
- while (flock(fd, operation) == -1) {
+ while (flock(fd, (int)operation) == -1) {
switch (errno) {
case EINTR:
/* retry */
diff --git a/mrbgems/mruby-io/src/io.c b/mrbgems/mruby-io/src/io.c
index 02aea381c..64729e05c 100644
--- a/mrbgems/mruby-io/src/io.c
+++ b/mrbgems/mruby-io/src/io.c
@@ -30,9 +30,15 @@
#define lseek _lseek
#define isatty _isatty
#define WEXITSTATUS(x) (x)
+ typedef int fsize_t;
+ typedef long ftime_t;
+ typedef long fsuseconds_t;
#else
#include <sys/wait.h>
#include <unistd.h>
+ typedef size_t fsize_t;
+ typedef time_t ftime_t;
+ typedef suseconds_t fsuseconds_t;
#endif
#ifdef _MSC_VER
@@ -278,9 +284,9 @@ option_to_fd(mrb_state *mrb, mrb_value obj, const char *key)
switch (mrb_type(opt)) {
case MRB_TT_DATA: /* IO */
- return mrb_fixnum(mrb_io_fileno(mrb, opt));
+ return (int)mrb_fixnum(mrb_io_fileno(mrb, opt));
case MRB_TT_FIXNUM:
- return mrb_fixnum(opt);
+ return (int)mrb_fixnum(opt);
default:
mrb_raise(mrb, E_ARGUMENT_ERROR, "wrong exec redirect action");
break;
@@ -752,7 +758,7 @@ mrb_io_sysread(mrb_state *mrb, mrb_value io)
if (!fptr->readable) {
mrb_raise(mrb, E_IO_ERROR, "not opened for reading");
}
- ret = read(fptr->fd, RSTRING_PTR(buf), (size_t)maxlen);
+ ret = read(fptr->fd, RSTRING_PTR(buf), (fsize_t)maxlen);
switch (ret) {
case 0: /* EOF */
if (maxlen == 0) {
@@ -826,7 +832,7 @@ mrb_io_syswrite(mrb_state *mrb, mrb_value io)
} else {
fd = fptr->fd2;
}
- length = write(fd, RSTRING_PTR(buf), (size_t)RSTRING_LEN(buf));
+ length = write(fd, RSTRING_PTR(buf), (fsize_t)RSTRING_LEN(buf));
if (length == -1) {
mrb_sys_fail(mrb, 0);
}
@@ -886,14 +892,14 @@ time2timeval(mrb_state *mrb, mrb_value time)
switch (mrb_type(time)) {
case MRB_TT_FIXNUM:
- t.tv_sec = (time_t)mrb_fixnum(time);
+ t.tv_sec = (ftime_t)mrb_fixnum(time);
t.tv_usec = 0;
break;
#ifndef MRB_WITHOUT_FLOAT
case MRB_TT_FLOAT:
- t.tv_sec = (time_t)mrb_float(time);
- t.tv_usec = (mrb_float(time) - t.tv_sec) * 1000000.0;
+ t.tv_sec = (ftime_t)mrb_float(time);
+ t.tv_usec = (fsuseconds_t)((mrb_float(time) - t.tv_sec) * 1000000.0);
break;
#endif
diff --git a/mrbgems/mruby-pack/src/pack.c b/mrbgems/mruby-pack/src/pack.c
index 489ad3718..ceb862d3f 100644
--- a/mrbgems/mruby-pack/src/pack.c
+++ b/mrbgems/mruby-pack/src/pack.c
@@ -1055,7 +1055,7 @@ alias:
} else if (ch == '*') {
count = -1;
} else if (ch == '_' || ch == '!' || ch == '<' || ch == '>') {
- if (strchr("sSiIlLqQ", t) == NULL) {
+ if (strchr("sSiIlLqQ", (int)t) == NULL) {
char ch_str = (char)ch;
mrb_raisef(mrb, E_ARGUMENT_ERROR, "'%S' allowed only after types sSiIlLqQ", mrb_str_new(mrb, &ch_str, 1));
}