PR fortran/18600
* gfortran.dg/stfunc_1.f90: New test.
From-SVN: r96389
+2003-03-13 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
+
+ PR fortran/18600
+ * gfortran.dg/stfunc_1.f90: New test.
+
2003-03-13 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
PR fortran/16907
--- /dev/null
+! { dg-do run }
+! this is a problem which disappeared between 2005-01-02 and 2005-03-13
+! PR 18600
+ logical a, b
+ a(b) = .true.
+ b = .false.
+ if (a(.false.)) b = .true.
+ if (.not.b) call abort
+ end