contrib/gcc/tree-tailcall.c

193 /* Checks whether the expression EXPR in stmt AT is independent of the
271 process_assignment (tree ass, tree stmt, block_stmt_iterator call, tree *m,
318       && (non_ass_var = independent_of_stmt_p (op1, stmt, call)))
321 	   && (non_ass_var = independent_of_stmt_p (op0, stmt, call)))
377   tree ass_var, ret_var, stmt, func, param, args, call = NULL_TREE;
391       stmt = bsi_stmt (bsi);
394       if (TREE_CODE (stmt) == LABEL_EXPR)
398       if (TREE_CODE (stmt) == MODIFY_EXPR)
400 	  ass_var = TREE_OPERAND (stmt, 0);
401 	  call = TREE_OPERAND (stmt, 1);
408 	  call = stmt;
415       ann = stmt_ann (stmt);
416       if (!ZERO_SSA_OPERANDS (stmt, (SSA_OP_VUSE | SSA_OP_VIRTUAL_DEFS))
487       stmt = bsi_stmt (absi);
489       if (TREE_CODE (stmt) == LABEL_EXPR)
492       if (TREE_CODE (stmt) == RETURN_EXPR)
495       if (TREE_CODE (stmt) != MODIFY_EXPR)
498       if (!process_assignment (stmt, stmt, bsi, &m, &a, &ass_var))
503   ret_var = TREE_OPERAND (stmt, 0);
513       if (!process_assignment (ret_var, stmt, bsi, &m, &a, &ass_var))
549   tree stmt, var, phi, tmp;
561 	      stmt = build2 (MODIFY_EXPR, ret_type, NULL_TREE,
567 	      var = make_ssa_name (tmp, stmt);
568 	      TREE_OPERAND (stmt, 0) = var;
569 	      bsi_insert_after (&bsi, stmt, BSI_NEW_STMT);
575       stmt = build2 (MODIFY_EXPR, ret_type, NULL_TREE,
577       var = make_ssa_name (SSA_NAME_VAR (a_acc), stmt);
578       TREE_OPERAND (stmt, 0) = var;
579       bsi_insert_after (&bsi, stmt, BSI_NEW_STMT);
585       stmt = build2 (MODIFY_EXPR, ret_type, NULL_TREE,
587       var = make_ssa_name (SSA_NAME_VAR (m_acc), stmt);
588       TREE_OPERAND (stmt, 0) = var;
589       bsi_insert_after (&bsi, stmt, BSI_NEW_STMT);
618   tree ret_stmt = last_stmt (bb), ret_var, var, stmt, tmp;
640       stmt = build2 (MODIFY_EXPR, ret_type, NULL_TREE,
646       var = make_ssa_name (tmp, stmt);
647       TREE_OPERAND (stmt, 0) = var;
648       bsi_insert_before (&bsi, stmt, BSI_SAME_STMT);
655       stmt = build2 (MODIFY_EXPR, ret_type, NULL_TREE,
661       var = make_ssa_name (tmp, stmt);
662       TREE_OPERAND (stmt, 0) = var;
663       bsi_insert_before (&bsi, stmt, BSI_SAME_STMT);
718   tree param, stmt, args, rslt, call;
725   stmt = orig_stmt = bsi_stmt (t->call_bsi);
732       print_generic_stmt (dump_file, stmt, TDF_SLIM);
736   if (TREE_CODE (stmt) == MODIFY_EXPR)
737     stmt = TREE_OPERAND (stmt, 1);
773        args = TREE_OPERAND (stmt, 1),
850       tree stmt = bsi_stmt (t->call_bsi);
852       stmt = get_call_expr_in (stmt);
853       CALL_EXPR_TAILCALL (stmt) = 1;
857 	  print_generic_expr (dump_file, stmt, dump_flags);
876   tree stmt, param, ret_type, tmp, phi;
888       stmt = last_stmt (e->src);
890       if (stmt
891 	  && TREE_CODE (stmt) == RETURN_EXPR)
979 	  stmt = last_stmt (e->src);
981 	  if (stmt
982 	      && TREE_CODE (stmt) == RETURN_EXPR)