Lines Matching refs:Fin_Stmt

7219          Fin_Stmt    : Node_Id;  variable
7257          Fin_Stmt := Build_Finalization_Call;
7259          if Present (Fin_Stmt) then
7261                Fin_Stmt :=
7265                        Statements         => New_List (Fin_Stmt),
7288                 Else_Statements => New_List (Fin_Stmt));
8659                Fin_Stmt : Node_Id;
8687                      Fin_Stmt := Call;
8690                         Fin_Stmt :=
8694                                 Statements         => New_List (Fin_Stmt),
8700                      Append_To (Bod_Stmts, Fin_Stmt);
8711                Fin_Stmt : Node_Id;
8733                   Fin_Stmt :=
8740                      Fin_Stmt :=
8744                              Statements         => New_List (Fin_Stmt),
8753                       Then_Statements => New_List (Fin_Stmt)));