r196805 - in /trunk: gcc/testsuite/ChangeLog gc...

[burnus@gcc.gnu.org]

Author: burnus
Date: Wed Mar 20 07:45:49 2013
New Revision: 196805

URL: http://gcc.gnu.org/viewcvs?rev=196805&root=gcc&view=rev
Log:
2013-03-20  Tilo Schwarz  <tilo@tilo-schwarz.de>

        PR libfortran/48618
        * io/open.c (st_open): Raise error for unit number < 0 only if
        unit number does not exist already.

2013-03-20  Tilo Schwarz  <tilo@tilo-schwarz.de>

        PR libfortran/48618
        * gfortran.dg/open_negative_unit_1.f90: New.


Added:
    trunk/gcc/testsuite/gfortran.dg/open_negative_unit_1.f90
Modified:
    trunk/gcc/testsuite/ChangeLog
    trunk/libgfortran/ChangeLog
    trunk/libgfortran/io/open.c