Mercurial > hg > CbC > CbC_gcc

comparison gcc/testsuite/gfortran.dg/integer_plus.f90 @ 131:84e7813d76e9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
gcc-8.2
author mir3636
date Thu, 25 Oct 2018 07:37:49 +0900
parents
children 1830386684a0
comparison
equal deleted inserted replaced
111:04ced10e8804 131:84e7813d76e9
1 ! { dg-run run )
2 ! PR83560 list-directed formatting of INTEGER is missing plus on output
3 ! when output open with SIGN='PLUS'
4 character(64) :: astring
5 i=789
6 open(unit=10, status='scratch', sign='plus')
7 write(10,*) i
8 rewind(10)
9 read(10,*) astring
10 close (10)
11 if (astring.ne.'+789') STOP 1
12 end