Lines Matching refs:backend_decl
421 if (sym->backend_decl == NULL) in gfc_trans_call()
422 sym->backend_decl = gfc_get_symbol_decl (sym); in gfc_trans_call()
423 gfc_add_modify (&se.pre, sym->backend_decl, se.expr); in gfc_trans_call()
1762 class_decl = DECL_LANG_SPECIFIC (sym2->backend_decl) ? in trans_associate_var()
1763 GFC_DECL_SAVED_DESCRIPTOR (sym2->backend_decl) : in trans_associate_var()
1764 sym2->backend_decl; in trans_associate_var()
1773 class_decl = sym2->backend_decl; in trans_associate_var()
1790 desc = sym->backend_decl; in trans_associate_var()
1828 se.expr = sym2->backend_decl; in trans_associate_var()
1850 tmp = sym->backend_decl; in trans_associate_var()
1873 desc = sym->backend_decl; in trans_associate_var()
1887 GFC_DECL_PTR_ARRAY_P (sym->backend_decl) = 1; in trans_associate_var()
1895 && VAR_P (sym->ts.u.cl->backend_decl) in trans_associate_var()
1896 && se.string_length != sym->ts.u.cl->backend_decl) in trans_associate_var()
1898 gfc_add_modify (&se.pre, sym->ts.u.cl->backend_decl, in trans_associate_var()
1899 fold_convert (TREE_TYPE (sym->ts.u.cl->backend_decl), in trans_associate_var()
1963 gcc_assert (GFC_DESCRIPTOR_TYPE_P (TREE_TYPE (sym->backend_decl))); in trans_associate_var()
1972 gfc_add_modify (&se.pre, sym->backend_decl, in trans_associate_var()
1976 gfc_add_modify (&se.pre, sym->backend_decl, se.expr); in trans_associate_var()
1982 tmp = gfc_conv_descriptor_dtype (sym->backend_decl); in trans_associate_var()
1984 gfc_get_dtype (TREE_TYPE (sym->backend_decl))); in trans_associate_var()
2031 && DECL_LANG_SPECIFIC (e->symtree->n.sym->backend_decl) in trans_associate_var()
2032 && GFC_DECL_SAVED_DESCRIPTOR (e->symtree->n.sym->backend_decl) in trans_associate_var()
2037 GFC_DECL_SAVED_DESCRIPTOR (e->symtree->n.sym->backend_decl); in trans_associate_var()
2079 && VAR_P (sym->ts.u.cl->backend_decl) in trans_associate_var()
2080 && se.string_length != sym->ts.u.cl->backend_decl) in trans_associate_var()
2082 gfc_add_modify (&se.pre, sym->ts.u.cl->backend_decl, in trans_associate_var()
2083 fold_convert (TREE_TYPE (sym->ts.u.cl->backend_decl), in trans_associate_var()
2087 tmp = gfc_call_free (sym->backend_decl); in trans_associate_var()
2096 tmp = fold_convert (TREE_TYPE (sym->backend_decl), se.expr); in trans_associate_var()
2101 tmp = TREE_TYPE (sym->backend_decl); in trans_associate_var()
2113 dtmp = TREE_TYPE (TREE_TYPE (sym->backend_decl)); in trans_associate_var()
2140 gfc_add_modify (&se.pre, sym->backend_decl, tmp); in trans_associate_var()
2162 tmp = sym->backend_decl; in trans_associate_var()
2173 tmp = sym->backend_decl; in trans_associate_var()
2193 tmp = sym->backend_decl; in trans_associate_var()
2221 tmp = e->symtree->n.sym->ts.u.cl->backend_decl; in trans_associate_var()
2232 charlen = sym->ts.type == BT_CHARACTER ? sym->ts.u.cl->backend_decl in trans_associate_var()
2233 : gfc_class_len_get (sym->backend_decl); in trans_associate_var()
3848 tmp = gfc_conv_array_offset (old_sym->backend_decl); in forall_make_variable_temp()
3888 new_sym->backend_decl = tse.expr; in forall_make_variable_temp()
4646 if (!expr1->ts.u.cl->backend_decl) in gfc_trans_assign_need_temp()
4652 expr1->ts.u.cl->backend_decl = tse.expr; in gfc_trans_assign_need_temp()
4655 expr1->ts.u.cl->backend_decl); in gfc_trans_assign_need_temp()
4979 sym->backend_decl = var[n]; in gfc_trans_forall_1()
6558 newsym->n.sym->backend_decl = expr3; in gfc_trans_allocate()
6608 newsym->n.sym->ts.u.cl->backend_decl = expr3_len; in gfc_trans_allocate()