Tobias Burnus wrote:
        {
+         symbol_attribute attr1, attr2;
          gfc_typespec *ts1 = &expr1->symtree->n.sym->ts;
-         gfc_typespec *ts2 = &expr2->symtree->n.sym->ts;
+         gfc_typespec *ts2 = &expr2->symtree->n.sym->ts;

[Ignore the "ts2"-line change: I have accidentally added a spurious " " in column 1, and missed it when sending the patch out.]

Tobias

Reply via email to