Lines Matching refs:Ecall_Node
1513 Ecall_Node : Node_Id; variable
1543 Ecall_Node := P_Name;
1548 if Nkind (Ecall_Node) = N_Indexed_Component then
1550 Prefix_Node : constant Node_Id := Prefix (Ecall_Node);
1551 Exprs_Node : constant List_Id := Expressions (Ecall_Node);
1554 Change_Node (Ecall_Node, N_Procedure_Call_Statement);
1555 Set_Name (Ecall_Node, Prefix_Node);
1556 Set_Parameter_Associations (Ecall_Node, Exprs_Node);
1559 elsif Nkind (Ecall_Node) = N_Function_Call then
1561 Fname_Node : constant Node_Id := Name (Ecall_Node);
1563 Parameter_Associations (Ecall_Node);
1566 Change_Node (Ecall_Node, N_Procedure_Call_Statement);
1567 Set_Name (Ecall_Node, Fname_Node);
1568 Set_Parameter_Associations (Ecall_Node, Params_List);
1571 elsif Nkind (Ecall_Node) = N_Identifier
1572 or else Nkind (Ecall_Node) = N_Selected_Component
1580 Set_Name (C_Node, Ecall_Node);
1582 Ecall_Node := C_Node;
1605 Entry_Call_Statement => Ecall_Node,
1632 Entry_Call_Statement => Ecall_Node,
1646 Triggering_Statement => Ecall_Node,