Part 1 of PR25561, fix compile warnings forgotten in actual commit.

From-SVN: r135379

diff --git a/libgfortran/io/fbuf.c b/libgfortran/io/fbuf.c
index ba6f71011dd77176e363750bd1bbc3c12ffec4df..e34fc75f93738afcae214e56b4d0afda78b5040c 100644 (file)
--- a/libgfortran/io/fbuf.c
+++ b/libgfortran/io/fbuf.c
@@ -126,7 +126,7 @@ fbuf_seek (gfc_unit * u, gfc_offset off)
   if (pos < 0)
     return -1;
   u->fbuf->ptr = u->fbuf->buf + pos;
-  if (pos > u->fbuf->act)
+  if (pos > (gfc_offset) u->fbuf->act)
     u->fbuf->act = pos;
   return 0;
 }

diff --git a/libgfortran/io/transfer.c b/libgfortran/io/transfer.c
index 8353f3ddb74c9495f1a5990dea7232fb132b55c8..ff7e651016eafb1dd3c81c4fa886f058f62e8095 100644 (file)
--- a/libgfortran/io/transfer.c
+++ b/libgfortran/io/transfer.c
@@ -2290,7 +2290,7 @@ skip_record (st_parameter_dt *dtp, size_t bytes)
        {
          rlength = 
            (MAX_READ > (size_t) dtp->u.p.current_unit->bytes_left_subrecord) ?
-           MAX_READ : dtp->u.p.current_unit->bytes_left_subrecord;
+           MAX_READ : (size_t) dtp->u.p.current_unit->bytes_left_subrecord;
 
          if (sread (dtp->u.p.current_unit->s, p, &rlength) != 0)
            {