Mercurial > hg > CbC > CbC_gcc
comparison gcc/testsuite/gfortran.dg/pr67885.f90 @ 132:d34655255c78
update gcc-8.2
author | mir3636 |
---|---|
date | Thu, 25 Oct 2018 10:21:07 +0900 |
parents | 84e7813d76e9 |
children |
comparison
equal
deleted
inserted
replaced
130:e108057fa461 | 132:d34655255c78 |
---|---|
5 program p | 5 program p |
6 block | 6 block |
7 integer, parameter :: a(2) = [1, 2] | 7 integer, parameter :: a(2) = [1, 2] |
8 integer :: x(2) | 8 integer :: x(2) |
9 x = a | 9 x = a |
10 if (x(1) /= 1) call abort | 10 if (x(1) /= 1) STOP 1 |
11 end block | 11 end block |
12 end | 12 end |