Searched refs:ppc_code (Results 1 – 2 of 2) sorted by relevance
1551 gfc_code *ppc_code; in gfc_trans_class_array_init_assign() local1561 ppc_code = gfc_get_code (EXEC_CALL); in gfc_trans_class_array_init_assign()1562 ppc_code->resolved_sym = ppc->symtree->n.sym; in gfc_trans_class_array_init_assign()1565 ppc_code->resolved_sym->attr.elemental = 1; in gfc_trans_class_array_init_assign()1566 ppc_code->ext.actual = actual; in gfc_trans_class_array_init_assign()1567 ppc_code->expr1 = ppc; in gfc_trans_class_array_init_assign()1570 res = gfc_trans_call (ppc_code, false, NULL, NULL, false); in gfc_trans_class_array_init_assign()1571 gfc_free_statements (ppc_code); in gfc_trans_class_array_init_assign()
1645 gfc_code *ppc_code; in gfc_trans_class_array_init_assign() local1655 ppc_code = gfc_get_code (EXEC_CALL); in gfc_trans_class_array_init_assign()1656 ppc_code->resolved_sym = ppc->symtree->n.sym; in gfc_trans_class_array_init_assign()1659 ppc_code->resolved_sym->attr.elemental = 1; in gfc_trans_class_array_init_assign()1660 ppc_code->ext.actual = actual; in gfc_trans_class_array_init_assign()1661 ppc_code->expr1 = ppc; in gfc_trans_class_array_init_assign()1664 res = gfc_trans_call (ppc_code, false, NULL, NULL, false); in gfc_trans_class_array_init_assign()1665 gfc_free_statements (ppc_code); in gfc_trans_class_array_init_assign()