[Bug fortran/88249] ICE in gfc_resolve_filepos, at fortran/io.c:2853

[kargl at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=88249

--- Comment #3 from kargl at gcc dot gnu.org ---
Author: kargl
Date: Tue Dec 11 23:13:19 2018
New Revision: 267035

URL: https://gcc.gnu.org/viewcvs?rev=267035&root=gcc&view=rev
Log:
2018-12-11  Steven G. Kargl  <ka...@gcc.gnu.org>

        PR fortran/88249
        * gfortran.h: Update prototype for gfc_resolve_filepos().
        * io.c (gfc_resolve_filepos): Check for UNIT number if ERR= is present.
        Use passed in locus for error message.
        * resolve.c (gfc_resolve_code): Pass locus in gfc_resolve_filepos()
        call.

2018-12-11  Steven G. Kargl  <ka...@gcc.gnu.org>

        PR fortran/88249
        * gfortran.dg/pr88249.f90: New test.

Added:
    trunk/gcc/testsuite/gfortran.dg/pr88249.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/gfortran.h
    trunk/gcc/fortran/io.c
    trunk/gcc/fortran/resolve.c
    trunk/gcc/testsuite/ChangeLog