Increase timeout factor for hppa*-*-* in gcc.dg/long_branch.c
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr85895.f90
blob184266e5ec8b6dba615d8530a6e7a2f9cf7a8609
1 ! { dg-do compile }
2 ! { dg-options "-fcoarray=lib" }
3 ! PR fortran/85895
4 subroutine p
5 character(80) :: c(2)
6 sync memory (errmsg=c) ! { dg-error "scalar CHARACTER variable" }
7 end subroutine p
9 subroutine q
10 character(80) :: c(2)
11 sync memory (errmsg=c(1:2)) ! { dg-error "scalar CHARACTER variable" }
12 end subroutine q
14 subroutine r
15 character(80) :: c(2)
16 sync memory (errmsg=c(1))
17 end subroutine r