* gfortran.dg/dev_null.f90. Remove and replace with...
* gfortran.dg/dev_null.F90: Use preprocessor define to generalize the DEV_NULL name. From-SVN: r134955
This commit is contained in:
parent
bba74577c5
commit
33437ca004
@ -1,3 +1,9 @@
|
||||
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.
|
||||
|
@ -1,8 +1,13 @@
|
||||
! { 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
|
Loading…
Reference in New Issue
Block a user