Searched refs:backend_decl (Results 1 - 14 of 14) sorted by relevance

/haiku-buildtools/gcc/gcc/fortran/
H A Dtrans-decl.c319 if (lp->backend_decl)
320 return lp->backend_decl;
342 lp->backend_decl = label_decl;
591 if (sym->ns->proc_name->backend_decl == current_function_decl
724 backend_decl for a module symbol, if it all ready exists. If the
727 an existing backend_decl is found. */
773 if (!s->backend_decl)
774 s->backend_decl = gfc_get_derived_type (s);
778 else if (s->backend_decl)
784 sym->ts.u.cl->backend_decl
2205 tree backend_decl; local
5848 tree backend_decl; local
[all...]
H A Dtrans-types.c1071 len = (cl == NULL) ? NULL_TREE : cl->backend_decl;
2169 if (sym->backend_decl && !sym->attr.function)
2170 return TREE_TYPE (sym->backend_decl);
2178 || !sym->ts.u.cl->backend_decl))))
2201 || sym->ts.u.cl->backend_decl)
2308 /* Copy the backend_decl and component backend_decls if
2322 if (from->backend_decl == NULL
2326 to->backend_decl = from->backend_decl;
2339 to_cm->backend_decl
[all...]
H A Dtrans-const.c191 if (!cl || cl->backend_decl)
196 cl->backend_decl = gfc_conv_mpz_to_tree (cl->length->value.integer,
198 cl->backend_decl = fold_convert (gfc_charlen_type_node,
199 cl->backend_decl);
H A Dtarget-memory.c266 ptr = TREE_INT_CST_LOW(DECL_FIELD_OFFSET(cmp->backend_decl))
267 + TREE_INT_CST_LOW(DECL_FIELD_BIT_OFFSET(cmp->backend_decl))/8;
271 size = int_size_in_bytes (TREE_TYPE (cmp->backend_decl));
559 gcc_assert (cmp->backend_decl);
560 ptr = TREE_INT_CST_LOW (DECL_FIELD_BIT_OFFSET (cmp->backend_decl));
562 ptr = ptr/8 + TREE_INT_CST_LOW (DECL_FIELD_OFFSET (cmp->backend_decl));
671 gcc_assert (cmp && cmp->backend_decl);
674 ptr = TREE_INT_CST_LOW(DECL_FIELD_OFFSET(cmp->backend_decl))
675 + TREE_INT_CST_LOW(DECL_FIELD_BIT_OFFSET(cmp->backend_decl))/8;
H A Dtrans-expr.c372 vtable = vtab->backend_decl;
656 tmp = e->symtree->n.sym->backend_decl;
791 /* When the string_length is not yet set, then try the backend_decl of
793 else if (e->ts.u.cl->backend_decl)
794 tmp = e->ts.u.cl->backend_decl;
812 tmp = e->ts.u.cl->backend_decl;
943 tmp = e->symtree->n.sym->backend_decl;
1687 e->ts.u.cl->backend_decl = tmpse.expr;
1695 length = e->symtree->n.sym->ts.u.cl->backend_decl;
1704 length = r->u.c.component->ts.u.cl->backend_decl;
[all...]
H A Dtrans-array.c743 gcc_assert (TREE_STATIC (sym->backend_decl));
745 type = TREE_TYPE (sym->backend_decl);
746 DECL_INITIAL (sym->backend_decl) = gfc_build_null_descriptor (type);
1828 *len = e->ts.u.cl->backend_decl;
1848 e->ts.u.cl->backend_decl = *len;
1902 *len = ts->u.cl->backend_decl;
2263 expr->ts.u.cl->backend_decl = ss_info->string_length;
3021 gcc_assert (expr->symtree->n.sym->backend_decl == current_function_decl);
3049 decl = expr->symtree->n.sym->backend_decl;
3118 decl = expr->symtree->n.sym->backend_decl;
[all...]
H A Dtrans.c2050 gcc_assert (ns->proc_name->backend_decl == NULL);
2051 ns->proc_name->backend_decl
2059 entry->namespace_decl = ns->proc_name->backend_decl;
2073 DECL_CONTEXT (n->proc_name->backend_decl) = ns->proc_name->backend_decl;
2074 gfc_module_add_decl (entry, n->proc_name->backend_decl);
2077 DECL_CONTEXT (el->sym->backend_decl) = ns->proc_name->backend_decl;
2078 gfc_module_add_decl (entry, el->sym->backend_decl);
2203 *decl = strlen ? strlen->backend_decl
[all...]
H A Dtrans-stmt.c433 if (sym->backend_decl == NULL)
434 sym->backend_decl = gfc_get_symbol_decl (sym);
435 gfc_add_modify (&se.pre, sym->backend_decl, se.expr);
1550 desc = sym->backend_decl;
1586 tmp = e->symtree->n.sym->backend_decl;
1609 gcc_assert (GFC_DESCRIPTOR_TYPE_P (TREE_TYPE (sym->backend_decl)));
1611 gfc_add_modify (&se.pre, sym->backend_decl, se.expr);
1617 tmp = gfc_conv_descriptor_dtype (sym->backend_decl);
1619 gfc_get_dtype (TREE_TYPE (sym->backend_decl)));
1702 tmp = TREE_TYPE (sym->backend_decl);
[all...]
H A Dtrans-io.c746 array = sym->backend_decl;
1545 gfc_symbol or gfc_component backend_decl's. An offset is
1570 decl = c->backend_decl;
1656 decl = (sym) ? sym->backend_decl : c->backend_decl;
1675 tmp = ts->u.cl->backend_decl;
2238 if (ts->u.derived->backend_decl == NULL_TREE)
2243 field = c->backend_decl;
H A Dtrans-openmp.c1288 && sym->ns->proc_name->backend_decl == parent_decl
1301 && (sym->ns->proc_name->backend_decl == current_function_decl
1315 && (sym->ns->proc_name->backend_decl == current_function_decl
1369 tree decl, backend_decl, stmt, type, outer_decl; local
1397 backend_decl = omp_reduction_init (c, gfc_sym_type (&init_val_sym));
1399 backend_decl = NULL;
1407 backend_decl = build_zero_cst (gfc_sym_type (&init_val_sym));
1410 backend_decl = NULL_TREE;
1413 init_val_sym.backend_decl = backend_decl;
[all...]
H A Dgfortran.h962 tree backend_decl; member in struct:gfc_charlen
1022 tree backend_decl; member in struct:gfc_component
1315 tree backend_decl; member in struct:gfc_st_label
1468 tree backend_decl; member in struct:gfc_symbol
H A Dtrans-common.c432 /* If there is no backend_decl for the common block, build it. */
749 s->sym->backend_decl = var_decl;
1265 these have to be created before code, because the backend_decl depends
H A Dsymbol.c3464 cl->backend_decl = old_cl->backend_decl;
H A Dtrans-intrinsic.c5293 len = sym->ts.u.cl->backend_decl;
5941 tmp = arg->symtree->n.sym->backend_decl;
6676 arg1->expr->ts.u.cl->backend_decl,
6772 tmp = gfc_class_vptr_get (a->symtree->n.sym->backend_decl);
6779 tmp = gfc_class_vptr_get (b->symtree->n.sym->backend_decl);

Completed in 236 milliseconds