diff options
| author | dfranke <dfranke@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-05-04 18:02:18 +0000 |
|---|---|---|
| committer | dfranke <dfranke@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-05-04 18:02:18 +0000 |
| commit | 7d86687017fb9bfa58571cfc46f786f539ba2601 (patch) | |
| tree | f5fbb8c905ad4fe8db79b23d98f6fdde28648680 /libgfortran/gfortran.map | |
| parent | 71ac9b47b872934e8d78ff35882d69f845545fbd (diff) | |
| download | gcc-7d86687017fb9bfa58571cfc46f786f539ba2601.tar.gz | |
gcc/fortran:
2007-05-04 Daniel Franke <franke.daniel@gmail.com>
PR fortran/22539
* intrinsic.c (add_subroutines): Added FSEEK.
* intrinsic.h (gfc_resolve_fseek_sub, gfc_check_fseek_sub): New.
* iresolve.c (gfc_resolve_fseek_sub): New.
* check.c (gfc_check_fseek_sub): New.
* intrinsic.texi (FSEEK): Updated.
gcc/testsuite:
2007-05-01 Daniel Franke <franke.daniel@gmail.com>
PR fortran/22539
* gfortran.dg/fseek.f90: New test.
libgfortran:
2007-05-04 Daniel Franke <franke.daniel@gmail.com>
PR fortran/22539
* io/intrinsics.c (fseek_sub): New.
* io/unix.c (fd_fseek): Change logical and physical offsets only
if seek succeeds.
* gfortran.map (fseek_sub): New.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@124437 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran/gfortran.map')
| -rw-r--r-- | libgfortran/gfortran.map | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/libgfortran/gfortran.map b/libgfortran/gfortran.map index 830651f87eb..19b458b7b64 100644 --- a/libgfortran/gfortran.map +++ b/libgfortran/gfortran.map @@ -128,6 +128,7 @@ GFORTRAN_1.0 { _gfortran_fraction_r4; _gfortran_fraction_r8; _gfortran_free; + _gfortran_fseek_sub; _gfortran_fstat_i4; _gfortran_fstat_i4_sub; _gfortran_fstat_i8; |