OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

* gfortran.dg/dollar_edit_descriptor-1.f: New test.

Browse Source 
From-SVN: r100316
This commit is contained in:
Francois-Xavier Coudert 2005-05-29 14:33:30 +02:00 committed by François-Xavier Coudert
parent c9330b0331
commit 95af2a1f7b
2 changed files with 16 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gcc/testsuite/ChangeLog
View File

@ -1,3 +1,7 @@
2005-05-29 Francois-Xavier Coudert <coudert@clipper.ens.fr>
* gfortran.dg/dollar_edit_descriptor-1.f: New test.
2005-05-28 Mark Mitchell <mark@codesourcery.com>
PR c++/21340

12
gcc/testsuite/gfortran.dg/dollar_edit_descriptor-1.f Normal file
View File

@ -0,0 +1,12 @@
! { dg-do run }
! PR libfortran/20006
character*5 c
open (42,status='scratch')
write (42,'(A,$)') 'abc'
write (42,'(A)') 'de'
rewind (42)
read (42,'(A)') c
close (42)
if (c /= 'abcde') call abort
end