* gfortran.dg/dev_null.F90: Use preprocessor define to
generalize the DEV_NULL name.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@134955
138bc75d-0d04-0410-961f-
82ee72b054a4
+2008-05-05 Danny Smith <dannysmith@users.sourceforge.net>
+
+ * gfortran.dg/dev_null.f90. Remove and replace with...
+ * gfortran.dg/dev_null.F90: Use preprocessor define to
+ generalize the DEV_NULL name.
+
2008-05-05 Andrew Pinski <andrew.pinski@playstation.sony.com>
* gcc.dg/tree-ssa/forwprop-5.c: New testcase.
! { dg-do run }
! pr19478 read from /dev/null
! Thomas.Koenig@online.de
+#if defined _WIN32
+#define DEV_NULL "nul"
+#else
+#define DEV_NULL "/dev/null"
+#endif
character*20 foo
- open(10,file="/dev/null")
+ open(10,file=DEV_NULL)
write(10,'(A)') "Hello"
rewind(10)
read(10,'(A)',end=100) foo