Lines Matching defs:Expand_Formal_Container_Loop

132    procedure Expand_Formal_Container_Loop (N : Node_Id);  subprogspec
3155    procedure Expand_Formal_Container_Loop (N : Node_Id) is  subprogram
3156       Loc       : constant Source_Ptr := Sloc (N);
3157       Isc       : constant Node_Id    := Iteration_Scheme (N);
3158       I_Spec    : constant Node_Id    := Iterator_Specification (Isc);
3159       Cursor    : constant Entity_Id  := Defining_Identifier (I_Spec);
3160       Container : constant Node_Id    := Entity (Name (I_Spec));
3161       Stats     : constant List_Id    := Statements (N);
3163       Advance   : Node_Id;
3164       Init_Decl : Node_Id;
3165       Init_Name : Entity_Id;
3166       New_Loop  : Node_Id;