Lines Matching refs:Ecall_Node
1420 Ecall_Node : Node_Id; variable
1450 Ecall_Node := P_Name;
1455 if Nkind (Ecall_Node) = N_Indexed_Component then
1457 Prefix_Node : constant Node_Id := Prefix (Ecall_Node);
1458 Exprs_Node : constant List_Id := Expressions (Ecall_Node);
1461 Change_Node (Ecall_Node, N_Procedure_Call_Statement);
1462 Set_Name (Ecall_Node, Prefix_Node);
1463 Set_Parameter_Associations (Ecall_Node, Exprs_Node);
1466 elsif Nkind (Ecall_Node) = N_Function_Call then
1468 Fname_Node : constant Node_Id := Name (Ecall_Node);
1470 Parameter_Associations (Ecall_Node);
1473 Change_Node (Ecall_Node, N_Procedure_Call_Statement);
1474 Set_Name (Ecall_Node, Fname_Node);
1475 Set_Parameter_Associations (Ecall_Node, Params_List);
1478 elsif Nkind (Ecall_Node) = N_Identifier
1479 or else Nkind (Ecall_Node) = N_Selected_Component
1487 Set_Name (C_Node, Ecall_Node);
1489 Ecall_Node := C_Node;
1512 Entry_Call_Statement => Ecall_Node,
1539 Entry_Call_Statement => Ecall_Node,
1553 Triggering_Statement => Ecall_Node,