r150021 - in /trunk/gcc: fortran/ChangeLog fort...

[jakub@gcc.gnu.org]

Author: jakub
Date: Thu Jul 23 18:09:43 2009
New Revision: 150021

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=150021
Log:
	PR fortran/40839
	* io.c (gfc_resolve_dt): Add LOC argument.  Fail if
	dt->io_unit is NULL.  Return FAILURE after issuing error about
	negative UNIT number.
	(match_io_element): Don't segfault if current_dt->io_unit is NULL.
	* gfortran.h (gfc_resolve_dt): Adjust prototype.
	* resolve.c (resolve_code): Adjust caller.

	* gfortran.dg/pr40839.f90: New test.

Added:
    trunk/gcc/testsuite/gfortran.dg/pr40839.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