re PR libfortran/23760 (gfortran incorrectly succeeds on record overflow)
2005-09-07 Jerry DeLisle <jvdelisle@verizon.net> PR libfortran/23760 * gfortran.dg/g77/1832.f: Remove long string in write statement to allow the test to pass on correct list directed output with prepended space. From-SVN: r104027
This commit is contained in:
parent
1da2e496b2
commit
5e949d8329
|
@ -1,3 +1,10 @@
|
|||
2005-09-07 Jerry DeLisle <jvdelisle@verizon.net>
|
||||
|
||||
PR libfortran/23760
|
||||
* gfortran.dg/g77/1832.f: Remove long string in write statement
|
||||
to allow the test to pass on correct list directed output with
|
||||
prepended space.
|
||||
|
||||
2005-09-07 James E Wilson <wilson@specifix.com>
|
||||
|
||||
* gcc.dg/intmax_t-1.c: Disable for xscale*-*-elf*.
|
||||
|
|
|
@ -1,9 +1,7 @@
|
|||
c { dg-do run }
|
||||
character*120 file
|
||||
character*5 string
|
||||
file = "c:/dos/adir/bdir/cdir/text.doc"
|
||||
write(string, *) "a ", file
|
||||
write(string, *) "a "
|
||||
if (string .ne. ' a') call abort
|
||||
C-- The leading space is normal for list-directed output
|
||||
C-- "file" is not printed because it would overflow "string".
|
||||
|
||||
end
|
||||
|
|
Loading…
Reference in New Issue