From d25b86b67cf4c6d83f206350452b163299db1355 Mon Sep 17 00:00:00 2001 From: jb Date: Thu, 15 May 2008 16:32:00 +0000 Subject: Part 1 of PR25561, fix compile warnings forgotten in actual commit. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@135379 138bc75d-0d04-0410-961f-82ee72b054a4 --- libgfortran/io/fbuf.c | 2 +- libgfortran/io/transfer.c | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) (limited to 'libgfortran') diff --git a/libgfortran/io/fbuf.c b/libgfortran/io/fbuf.c index ba6f71011dd..e34fc75f937 100644 --- 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 8353f3ddb74..ff7e651016e 100644 --- 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) { -- cgit v1.2.1