2 ! { dg-options "-fdec-structure" }
4 ! Tests for what CAN'T be done with dot ('.') as a member accessor.
14 j
= i
.j
! { dg-error "nonderived-type variable" }
15 j
= r
.eq
. i
! { dg-error "Operands of comparison" }
16 j
= r
.i
! { dg-error "is not a member of" }
17 j
= r
. ! { dg-error "Expected structure component or operator name" }
18 j
= .i
! { dg-error "Invalid character in name" }