diff options
| author | Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de> | 2004-05-18 18:06:09 +0200 |
|---|---|---|
| committer | Tobias Schlüter <tobi@gcc.gnu.org> | 2004-05-18 18:06:09 +0200 |
| commit | 81f4be3ce1fd9f08d811cf61413e374e0dc43166 (patch) | |
| tree | 23c4c98b07e24eaf1541c8090b2f9c1c5e2f219e /libgfortran/io/backspace.c | |
| parent | 7d72d96efe1f576cbeea5e6c59724a8d47f476b9 (diff) | |
| download | gcc-81f4be3ce1fd9f08d811cf61413e374e0dc43166.zip gcc-81f4be3ce1fd9f08d811cf61413e374e0dc43166.tar.gz gcc-81f4be3ce1fd9f08d811cf61413e374e0dc43166.tar.bz2 | |
re PR libfortran/15235 (libgfortran doesn't build on Solaris 10)
PR fortran/15235
* gfortran.h (offset_t): Rename to ...
(gfc_offset): ... this.
* io/backspace.c (formatted_backspace, unformatted_backspace),
io/io.h (stream, gfc_unit, global_t, file_length, file_position),
transfer.c (us_read, us_write, next_record_r, next_record_w),
io/unit.c (init_units), unix.c (unix_stream, fd_alloc,
fd_alloc_r_at, fd_alloc_w_at, fd_seek, mmap_alloc,
mmap_alloc_r_at, mmap_alloc_w_at, mmap_seek, mem_alloc_r_at,
mem_alloc_w_at, mem_seek, file_length, file_position): Replace all
occurences of offset_t by gfc_offset.
From-SVN: r81994
Diffstat (limited to 'libgfortran/io/backspace.c')
| -rw-r--r-- | libgfortran/io/backspace.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/libgfortran/io/backspace.c b/libgfortran/io/backspace.c index 5cfc43c..aff4c5e 100644 --- a/libgfortran/io/backspace.c +++ b/libgfortran/io/backspace.c @@ -34,7 +34,7 @@ Boston, MA 02111-1307, USA. */ static void formatted_backspace (void) { - offset_t base; + gfc_offset base; char *p; int n; @@ -92,12 +92,12 @@ io_error: static void unformatted_backspace (void) { - offset_t *p, new; + gfc_offset *p, new; int length; - length = sizeof (offset_t); + length = sizeof (gfc_offset); - p = (offset_t *) salloc_r_at (current_unit->s, &length, + p = (gfc_offset *) salloc_r_at (current_unit->s, &length, file_position (current_unit->s) - length); if (p == NULL) goto io_error; |