Mercurial > hg > CbC > CbC_gcc

view gcc/testsuite/gfortran.dg/coarray_collectives_2.f90 @ 118:fd00160c1b76

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
ifdef TARGET_64BIT
author mir3636
date Tue, 27 Feb 2018 15:01:35 +0900
parents 04ced10e8804
children 84e7813d76e9
line wrap: on
line source

! { dg-do compile }
! { dg-options "-fcoarray=single -std=f2008" }
!
!
! CO_SUM/CO_MIN/CO_MAX
!
program test
  implicit none
  intrinsic co_max ! { dg-error "is not available in the current standard settings but new in TS 29113/TS 18508." }
  intrinsic co_min ! { dg-error "is not available in the current standard settings but new in TS 29113/TS 18508." }
  intrinsic co_sum ! { dg-error "is not available in the current standard settings but new in TS 29113/TS 18508." }
end program test