On 19/09/2012 20:46, Paul Richard Thomas wrote: >>> + || comp1->attr.proc_pointer_comp >> That one doesn't look right. > > Why not? It skips any component containing a procedure pointer subcomponent. Actually, from looking at parse.c where the flag is set, it seems that the flag is only set for derived types, not for components, so it's not that bad; the condition never triggers.
> >> `this_code' should be cleared, otherwise it is used in the next iteration. > I'll check that this is not done in gfc_free_statements (no source to > hand at the moment) - I believe that it is. To be clear, the _pointer_ should be cleared: this_code = NULL; Mikael