Hi Andre,

> +      /* Mark so that rhs "used unallocated" warnings can be issued.
>   Component
> +        references do not generate the warnings.  */
> +      for (ref = expr1->ref; ref; ref = ref->next)
> +       if (ref->type == REF_COMPONENT)
> +         break;
>
Good spot - I had gone blind to it :-( Dead code duly removed.

Thanks for the review.

Paul

Reply via email to