diff options
| author | Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2016-12-21 09:35:57 +0000 |
|---|---|---|
| committer | François-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2016-12-21 09:35:57 +0000 |
| commit | f7db9ebf2b793ee115d572267b8c97362f43575c (patch) | |
| tree | f026989ec1d1cc3ed32ddcbad5415fd04d399551 /gcc | |
| parent | 84ab8b8ad51a339d05a65759a4f603b01f0aa80a (diff) | |
| download | gcc-f7db9ebf2b793ee115d572267b8c97362f43575c.zip gcc-f7db9ebf2b793ee115d572267b8c97362f43575c.tar.gz gcc-f7db9ebf2b793ee115d572267b8c97362f43575c.tar.bz2 | |
iresolve.c (gfc_resolve_ftell): Call "ftell" instead of "ftell2".
* iresolve.c (gfc_resolve_ftell): Call "ftell" instead of "ftell2".
* gfortran.map: Remove _gfortran_ftell2.
* io/intrinsics.c (ftell): Remove.
(ftell2): Rename to ftell.
From-SVN: r243841
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/fortran/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/fortran/iresolve.c | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 5154b19..e4bc0e8 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,7 @@ +2016-12-21 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> + + * iresolve.c (gfc_resolve_ftell): Call "ftell" instead of "ftell2". + 2016-12-20 Janne Blomqvist <jb@gcc.gnu.org> * trans-types.c (gfc_init_types): Don't redefine boolean type node. diff --git a/gcc/fortran/iresolve.c b/gcc/fortran/iresolve.c index b289c9f..a30ed9f 100644 --- a/gcc/fortran/iresolve.c +++ b/gcc/fortran/iresolve.c @@ -2604,7 +2604,7 @@ gfc_resolve_ftell (gfc_expr *f, gfc_expr *u) gfc_convert_type (u, &ts, 2); } - f->value.function.name = gfc_get_string (PREFIX ("ftell2")); + f->value.function.name = gfc_get_string (PREFIX ("ftell")); } |