re PR libfortran/48618 (Negative unit number in OPEN(...) is sometimes allowed)
authorTilo Schwarz <tilo@tilo-schwarz.de>
Wed, 20 Mar 2013 07:45:49 +0000 (07:45 +0000)
committerTobias Burnus <burnus@gcc.gnu.org>
Wed, 20 Mar 2013 07:45:49 +0000 (08:45 +0100)
commit09c7dc636d0f407c4184b33e97928c3e2545130b
tree0744b6d570842d8431a17b50679a66226389d6f5
parenta192015dbab317517c463c5ed1ce03f3df22cbbe
re PR libfortran/48618 (Negative unit number in OPEN(...) is sometimes allowed)

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.

From-SVN: r196805
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/open_negative_unit_1.f90 [new file with mode: 0644]
libgfortran/ChangeLog
libgfortran/io/open.c