Increase timeout factor for hppa*-*-* in gcc.dg/long_branch.c
[official-gcc.git] / gcc / testsuite / gfortran.dg / allocate_scalar_with_shape.f90
blob0fa9ce1fce9c2d8ea2e4b2bbf956c80ace473e15
1 ! { dg-do compile }
2 ! PR fortran/41940
4 integer, allocatable :: a
5 TYPE :: x
6 integer, allocatable :: a
7 END TYPE
8 TYPE (x) :: y
10 allocate(a(4)) ! { dg-error "Shape specification for allocatable scalar" }
11 allocate(y%a(4)) ! { dg-error "Shape specification for allocatable scalar" }
12 end