Lines Matching refs:Parent_P
8065 Parent_P : Node_Id; variable
8284 Parent_P := Parent (P);
8292 if No (Parent_P) then
8299 if Nkind (Parent_P) = N_Subprogram_Body
8300 and then Unique_Defining_Entity (Parent_P) =
8303 P := Parent_P;
8307 P := Parent_P;
8325 Parent_P := Parent (P);
8333 if No (Parent_P) then
8339 case Nkind (Parent_P) is
8425 if In_Expanded_Body (Parent_P) then
8427 Subp_Body : constant Node_Id := Parent (Parent_P);
8484 Parent_P := Parent (Parent_P);
8545 Has_Decl_In_List (Nam, P, Actions (Parent_P)))
8548 Has_Decl_In_List (Typ, P, Actions (Parent_P)));
8554 L1 : constant List_Id := Then_Actions (Parent_P);
8555 L2 : constant List_Id := Else_Actions (Parent_P);
8593 P := Parent_P;