Chromium Code Reviews
chromiumcodereview-hr@appspot.gserviceaccount.com (chromiumcodereview-hr) | Please choose your nickname with Settings | Help | Chromium Project | Gerrit Changes | Sign out
(341)

Issues Search
    My Issues | Starred     Open | Closed | All

Side by Side Diff: gcc/gcc/testsuite/gfortran.dg/backslash_1.f90

Issue 3050029: [gcc] GCC 4.5.0=>4.5.1 (Closed) Base URL: ssh://git@gitrw.chromium.org:9222/nacl-toolchain.git
Patch Set: Created 10 years, 4 months ago
Use n/p to move between diff chunks; N/P to move between comments. Draft comments are only viewable by you.
Jump to:
View unified diff | Download patch | Annotate | Revision Log
« no previous file with comments | « gcc/gcc/testsuite/gfortran.dg/assumed_charlen_function_5.f90 ('k') | gcc/gcc/testsuite/gfortran.dg/backspace_10.f90 » ('j') | no next file with comments »
Toggle Intra-line Diffs ('i') | Expand Comments ('e') | Collapse Comments ('c') | Show Comments Hide Comments ('s')
OLDNEW
1 ! { dg-do run { target fd_truncate } } 1 ! { dg-do run }
2 character(len=4) a 2 character(len=4) a
3 open (10, status='scratch') 3 open (10, status='scratch')
4 write (10,'(A)') '1\n2' 4 write (10,'(A)') '1\n2'
5 rewind (10) 5 rewind (10)
6 read (10,'(A)') a 6 read (10,'(A)') a
7 if (a /= '1\n2') call abort 7 if (a /= '1\n2') call abort
8 end 8 end
OLDNEW
« no previous file with comments | « gcc/gcc/testsuite/gfortran.dg/assumed_charlen_function_5.f90 ('k') | gcc/gcc/testsuite/gfortran.dg/backspace_10.f90 » ('j') | no next file with comments »

Powered by Google App Engine
This is Rietveld 408576698