diff options
author | Janne Blomqvist <jb@gcc.gnu.org> | 2009-12-04 18:28:44 +0200 |
---|---|---|
committer | Janne Blomqvist <jb@gcc.gnu.org> | 2009-12-04 18:28:44 +0200 |
commit | a4384badd778dd4d5947f4a9aadf1c34050d6049 (patch) | |
tree | a435ab3b0975b61493223bb3a25af26b5f2a3e5b /libgfortran/io/unix.h | |
parent | 0c5526222ccc8870c9ea1d8fd43efb4ea7e674fa (diff) | |
download | gcc-a4384badd778dd4d5947f4a9aadf1c34050d6049.zip gcc-a4384badd778dd4d5947f4a9aadf1c34050d6049.tar.gz gcc-a4384badd778dd4d5947f4a9aadf1c34050d6049.tar.bz2 |
PR libfortran/40812 Large file support for MinGW
From-SVN: r154984
Diffstat (limited to 'libgfortran/io/unix.h')
-rw-r--r-- | libgfortran/io/unix.h | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/libgfortran/io/unix.h b/libgfortran/io/unix.h index f0f0712..e691982 100644 --- a/libgfortran/io/unix.h +++ b/libgfortran/io/unix.h @@ -33,10 +33,10 @@ struct stream { ssize_t (*read) (struct stream *, void *, ssize_t); ssize_t (*write) (struct stream *, const void *, ssize_t); - off_t (*seek) (struct stream *, off_t, int); - off_t (*tell) (struct stream *); + gfc_offset (*seek) (struct stream *, gfc_offset, int); + gfc_offset (*tell) (struct stream *); /* Avoid keyword truncate due to AIX namespace collision. */ - int (*trunc) (struct stream *, off_t); + int (*trunc) (struct stream *, gfc_offset); int (*flush) (struct stream *); int (*close) (struct stream *); }; @@ -54,20 +54,20 @@ swrite (stream * s, const void * buf, ssize_t nbyte) return s->write (s, buf, nbyte); } -static inline off_t -sseek (stream * s, off_t offset, int whence) +static inline gfc_offset +sseek (stream * s, gfc_offset offset, int whence) { return s->seek (s, offset, whence); } -static inline off_t +static inline gfc_offset stell (stream * s) { return s->tell (s); } static inline int -struncate (stream * s, off_t length) +struncate (stream * s, gfc_offset length) { return s->trunc (s, length); } |