Mercurial > hg > CbC > CbC_gcc

comparison gcc/testsuite/gfortran.dg/dec_union_3.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 04ced10e8804
children
comparison
equal deleted inserted replaced
111:04ced10e8804 131:84e7813d76e9
5 ! 5 !
6 6
7 subroutine aborts (s) 7 subroutine aborts (s)
8 character(*), intent(in) :: s 8 character(*), intent(in) :: s
9 print *, s 9 print *, s
10 call abort() 10 STOP 1
11 end subroutine 11 end subroutine
12 12
13 ! Initialization expressions 13 ! Initialization expressions
14 structure /s3/ 14 structure /s3/
15 integer(4) :: i = 8 15 integer(4) :: i = 8