[Fortran] Improved dependency analysis of pointer variables
Paul Thomas
paulthomas2@wanadoo.fr
Sat Mar 25 06:29:00 GMT 2006
Roger,
>Ok for mainline?
>
>
OK, subject to one comment/correction.
Paul
>
>! /* Symbols can only alias if they have the same type. */
>! if (ts1->type != BT_UNKNOWN
>! && ts2->type != BT_UNKNOWN
>! && ts1->type != BT_DERIVED
>! && ts2->type != BT_DERIVED)
>! {
>! if (ts1->type != ts2->type
>! || ts1->kind != ts2->kind)
>! return 0;
>! }
>
>
This is too restrictive of derived types, isn't it? You could use
interface.c (gfc_compare_derived_types, gfc_compare_derived_types) to
determine if the types are the same; that way, derived types are tested too.
Paul
More information about the Fortran
mailing list