3 ! PR fortran/34714 - ICE on invalid
4 ! Testcase contributed by Martin Reinecke <martin AT mpa-garching DOT mpg DOT de>
9 logical, pointer, dimension(:) :: baz
15 allocate(func1
%baz(1))
20 allocate(func1
%baz(1)) ! { dg-error "is not a variable" }