Lines Matching refs:CLASS_DATA

333 	   ? CLASS_DATA (sym)->as : sym->as;
347 && !(CLASS_DATA (sym)->attr.class_pointer
348 || CLASS_DATA (sym)->attr.allocatable)))
360 && (CLASS_DATA (sym)->attr.class_pointer
361 || CLASS_DATA (sym)->attr.allocatable
362 || CLASS_DATA (sym)->attr.target))
451 || (sym->ts.type == BT_CLASS && CLASS_DATA (sym)
452 && CLASS_DATA (sym)->attr.codimension))
459 if (sym->as || (sym->ts.type == BT_CLASS && CLASS_DATA (sym)
460 && CLASS_DATA (sym)->as))
468 || (sym->ts.type == BT_CLASS && CLASS_DATA (sym)
469 && CLASS_DATA (sym)->attr.allocatable))
478 || (sym->ts.type == BT_CLASS && CLASS_DATA (sym)
479 && CLASS_DATA (sym)->attr.class_pointer))
1158 if (comp->ts.type == BT_CLASS && CLASS_DATA (comp)->as)
1159 rank = CLASS_DATA (comp)->as->rank;
1266 && (CLASS_DATA (comp)->attr.class_pointer
1267 || CLASS_DATA (comp)->attr.allocatable))))
1912 && CLASS_DATA (sym)->as))
1915 ? CLASS_DATA (sym)->as->rank : sym->as->rank;
1920 ? CLASS_DATA (sym)->as : sym->as;
2640 if (sym->ts.type == BT_CLASS && !CLASS_DATA (sym))
2642 if (sym->ts.type == BT_CLASS && CLASS_DATA (sym)->as)
2643 expr->rank = CLASS_DATA (sym)->as->rank;
4298 as = CLASS_DATA (e->symtree->n.sym)->as;
4682 && CLASS_DATA (ref->u.c.component)->attr.pointer))
4691 && CLASS_DATA (ref->u.c.component)->attr.allocatable))
4921 && CLASS_DATA (sym)->as
4922 && CLASS_DATA (sym)->as->type == AS_ASSUMED_RANK)
4965 && CLASS_DATA (sym)->as
4966 && CLASS_DATA (sym)->as->type == AS_ASSUMED_RANK)
6601 allocatable = CLASS_DATA (sym)->attr.allocatable;
6602 pointer = CLASS_DATA (sym)->attr.class_pointer;
6624 allocatable = CLASS_DATA (c)->attr.allocatable;
6625 pointer = CLASS_DATA (c)->attr.class_pointer;
6859 if (sym->ts.type == BT_CLASS && CLASS_DATA (sym))
6861 allocatable = CLASS_DATA (sym)->attr.allocatable;
6862 pointer = CLASS_DATA (sym)->attr.class_pointer;
6863 dimension = CLASS_DATA (sym)->attr.dimension;
6864 codimension = CLASS_DATA (sym)->attr.codimension;
6865 is_abstract = CLASS_DATA (sym)->attr.abstract;
6910 allocatable = CLASS_DATA (c)->attr.allocatable;
6911 pointer = CLASS_DATA (c)->attr.class_pointer;
6912 dimension = CLASS_DATA (c)->attr.dimension;
6913 codimension = CLASS_DATA (c)->attr.codimension;
6914 is_abstract = CLASS_DATA (c)->attr.abstract;
7037 if (e->ts.type == BT_CLASS && CLASS_DATA (e)->attr.dimension
8103 selector_type = CLASS_DATA (code->expr2)->ts.u.derived;
8116 selector_type = CLASS_DATA (code->expr1)->ts.u.derived;
8241 gcc_assert (ivtab && CLASS_DATA (ivtab)->initializer);
8242 e = CLASS_DATA (ivtab)->initializer;
11073 as = CLASS_DATA (sym)->as;
11084 pointer = CLASS_DATA (sym)->attr.class_pointer;
11085 allocatable = CLASS_DATA (sym)->attr.allocatable;
11086 dimension = CLASS_DATA (sym)->attr.dimension;
11134 && !gfc_type_is_extensible (CLASS_DATA (sym)->ts.u.derived))
11137 CLASS_DATA (sym)->ts.u.derived->name, sym->name,
11351 && CLASS_DATA (sym)->attr.allocatable))
12320 if (CLASS_DATA (me_arg)->ts.u.derived
12330 if (CLASS_DATA (me_arg)->as && CLASS_DATA (me_arg)->as->rank != 0)
12336 if (CLASS_DATA (me_arg)->attr.allocatable)
12342 if (CLASS_DATA (me_arg)->attr.class_pointer)
12767 && CLASS_DATA (me_arg)->ts.u.derived != sym))
12924 && CLASS_DATA (c)->ts.u.derived->attr.generic)
12925 CLASS_DATA (c)->ts.u.derived
12926 = gfc_find_dt_in_generic (CLASS_DATA (c)->ts.u.derived);
12939 && CLASS_DATA (c)->attr.class_pointer
12940 && CLASS_DATA (c)->ts.u.derived->components == NULL
12941 && !CLASS_DATA (c)->ts.u.derived->attr.zero_comp
12953 || !(CLASS_DATA (c)->attr.class_pointer
12954 || CLASS_DATA (c)->attr.allocatable)))
13398 as = CLASS_DATA (sym)->as;
13399 class_attr = CLASS_DATA (sym)->attr;
13769 && CLASS_DATA (sym)->attr.coarray_comp))
13790 && CLASS_DATA (sym)->attr.coarray_comp))
13832 && CLASS_DATA (sym)->attr.coarray_comp))
13980 && !CLASS_DATA (sym)->attr.class_pointer
13981 && !CLASS_DATA (sym)->attr.allocatable)