view gcc/testsuite/gfortran.dg/gomp/warn_truncated.f90 @ 19:2b5abeee2509 default tip

update gcc11
author anatofuz
date Mon, 25 May 2020 07:50:57 +0900
parents
children
line wrap: on
line source

! { dg-do compile }
!
! PR fortran/94709
!
! Check that 'Line truncated' gets printed as appropriate
!
integer i
i = 0
!$omp target                                                                                                                                        ! map()
!$omp end target

!$omp target                                                                                                                                        map() ! { dg-error "Line truncated" }
!$acc kernels                                                                                                                                       copy()
!a =                                                                                                                                                 5
!$acc end kernels
!$omp end target
end

! { dg-message "some warnings being treated as errors" "" {target "*-*-*"} 0 }