Searched refs:caf_type (Results 1 - 3 of 3) sorted by relevance

/haiku-buildtools/gcc/gcc/fortran/
H A Dtrans.c1355 tree caf_type, token, cond2; local
1371 caf_type = TREE_TYPE (caf_decl);
1379 if (GFC_DESCRIPTOR_TYPE_P (caf_type)
1380 && GFC_TYPE_ARRAY_AKIND (caf_type) == GFC_ARRAY_ALLOCATABLE)
1387 gcc_assert (GFC_ARRAY_TYPE_P (caf_type)
1388 && GFC_TYPE_ARRAY_CAF_TOKEN (caf_type) != NULL_TREE);
1389 token = GFC_TYPE_ARRAY_CAF_TOKEN (caf_type);
H A Dtrans-expr.c5499 tree caf_decl, caf_type; local
5503 caf_type = TREE_TYPE (caf_decl);
5505 if (GFC_DESCRIPTOR_TYPE_P (caf_type)
5506 && (GFC_TYPE_ARRAY_AKIND (caf_type) == GFC_ARRAY_ALLOCATABLE
5507 || GFC_TYPE_ARRAY_AKIND (caf_type) == GFC_ARRAY_POINTER))
5514 gcc_assert (GFC_ARRAY_TYPE_P (caf_type)
5515 && GFC_TYPE_ARRAY_CAF_TOKEN (caf_type) != NULL_TREE);
5516 tmp = GFC_TYPE_ARRAY_CAF_TOKEN (caf_type);
5521 if (GFC_DESCRIPTOR_TYPE_P (caf_type)
5522 && GFC_TYPE_ARRAY_AKIND (caf_type)
[all...]
H A Dtrans-decl.c2401 tree caf_type; local
2407 caf_type = f->sym->ts.type == BT_CLASS
2428 gcc_assert (GFC_TYPE_ARRAY_CAF_TOKEN (caf_type) == NULL_TREE);
2429 GFC_TYPE_ARRAY_CAF_TOKEN (caf_type) = token;
2454 gcc_assert (GFC_TYPE_ARRAY_CAF_OFFSET (caf_type) == NULL_TREE);
2455 GFC_TYPE_ARRAY_CAF_OFFSET (caf_type) = offset;

Completed in 169 milliseconds