/dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/ada/ |
H A D | ChangeLog-2017 | 1610 * errout.ads (Current_Node): New. 1611 * errout.adb (Error_Msg): Use Current_Node. 1612 * par-ch6.adb, par-ch7.adb, par-ch9.adb, par-util.adb: Set Current_Node
|
H A D | errout.adb | 310 Error_Msg (Msg, Flag_Location, Current_Node);
|
H A D | errout.ads | 71 Current_Node : Node_Id := Empty; variable
|
H A D | exp_ch9.adb | 322 Current_Node : in out Node_Id; 8456 Current_Node : Node_Id; variable 8559 Current_Node := N; 8801 Current_Node : Node_Id := N; variable 8897 Current_Node := Subp; 8920 Current_Node := Subp; 9033 Current_Node := Rec_Decl; 9169 Current_Node := Sub; 9348 Current_Node := Sub; 9359 Current_Node := Sub; [all …]
|
H A D | par-ch6.adb | 339 Current_Node := Name_Node;
|
H A D | par-ch7.adb | 149 Current_Node := Name_Node; 215 Current_Node := Name_Node;
|
H A D | par-ch9.adb | 104 Current_Node := Name_Node; 172 Current_Node := Name_Node; 181 Current_Node := Name_Node; 453 Current_Node := Name_Node; 508 Current_Node := Name_Node; 525 Current_Node := Name_Node; 1083 Current_Node := Token_Node; 1232 Current_Node := Name_Node;
|
H A D | par-util.adb | 673 Current_Node := Scope.Table (Scope.Last).Labl;
|
H A D | sem_util.adb | 6537 Current_Node : Node_Id; variable 6540 Current_Node := N; 6541 while Present (Current_Node) 6542 and then Nkind (Current_Node) /= N_Compilation_Unit 6544 Current_Node := Parent (Current_Node); 6547 if Nkind (Current_Node) /= N_Compilation_Unit then 6550 return Current_Node;
|
/dports/devel/ada-util/ada-util-b6612400/testutil/ahven/ |
H A D | ahven-framework.adb | 746 Current_Node : Node_Access := Target.First; variable 749 while Current_Node /= null loop 750 Next_Node := Current_Node.Next; 751 Remove (Current_Node); 752 Current_Node := Next_Node; 760 Current_Node : Node_Access := Target.First; variable 762 while Current_Node /= null loop 763 Action (Current_Node.Data.all); 764 Current_Node := Current_Node.Next;
|
H A D | ahven-slist.adb | 50 Current_Node : Node_Access := Target.First; variable 53 while Current_Node /= null loop 54 Next_Node := Current_Node.Next; 55 Remove (Current_Node); 56 Current_Node := Next_Node; 97 Current_Node : Node_Access := Target.First; variable 99 while Current_Node /= null loop 100 Action (Current_Node.Data); 101 Current_Node := Current_Node.Next;
|
/dports/devel/ahven/ahven-2.6/src/ |
H A D | ahven-framework.adb | 121 Current_Node : Node_Access := Target.First; variable 124 while Current_Node /= null loop 125 Next_Node := Current_Node.Next; 126 Remove (Current_Node); 127 Current_Node := Next_Node; 135 Current_Node : Node_Access := Target.First; variable 137 while Current_Node /= null loop 138 Action (Current_Node.Data.all); 139 Current_Node := Current_Node.Next;
|
H A D | ahven-slist.adb | 50 Current_Node : Node_Access := Target.First; variable 53 while Current_Node /= null loop 54 Next_Node := Current_Node.Next; 55 Remove (Current_Node); 56 Current_Node := Next_Node; 97 Current_Node : Node_Access := Target.First; variable 99 while Current_Node /= null loop 100 Action (Current_Node.Data); 101 Current_Node := Current_Node.Next;
|
/dports/devel/arm-none-eabi-gcc/gcc-8.4.0/gcc/ada/ |
H A D | ChangeLog-2017 | 1610 * errout.ads (Current_Node): New. 1611 * errout.adb (Error_Msg): Use Current_Node. 1612 * par-ch6.adb, par-ch7.adb, par-ch9.adb, par-util.adb: Set Current_Node
|
H A D | errout.adb | 310 Error_Msg (Msg, Flag_Location, Current_Node);
|
H A D | errout.ads | 71 Current_Node : Node_Id := Empty; variable
|
H A D | exp_ch9.adb | 322 Current_Node : in out Node_Id; 8456 Current_Node : Node_Id; variable 8559 Current_Node := N; 8801 Current_Node : Node_Id := N; variable 8897 Current_Node := Subp; 8920 Current_Node := Subp; 9033 Current_Node := Rec_Decl; 9169 Current_Node := Sub; 9348 Current_Node := Sub; 9359 Current_Node := Sub; [all …]
|
H A D | par-ch6.adb | 339 Current_Node := Name_Node;
|
H A D | par-ch7.adb | 149 Current_Node := Name_Node; 215 Current_Node := Name_Node;
|
H A D | par-ch9.adb | 104 Current_Node := Name_Node; 172 Current_Node := Name_Node; 181 Current_Node := Name_Node; 453 Current_Node := Name_Node; 508 Current_Node := Name_Node; 525 Current_Node := Name_Node; 1083 Current_Node := Token_Node; 1232 Current_Node := Name_Node;
|
H A D | par-util.adb | 673 Current_Node := Scope.Table (Scope.Last).Labl;
|
H A D | sem_util.adb | 6537 Current_Node : Node_Id; variable 6540 Current_Node := N; 6541 while Present (Current_Node) 6542 and then Nkind (Current_Node) /= N_Compilation_Unit 6544 Current_Node := Parent (Current_Node); 6547 if Nkind (Current_Node) /= N_Compilation_Unit then 6550 return Current_Node;
|
/dports/devel/arm-none-eabi-gcc492/gcc-4.9.2/gcc/ada/ |
H A D | exp_ch9.adb | 322 Current_Node : in out Node_Id; 8508 Current_Node : Node_Id; variable 8611 Current_Node := N; 8861 Current_Node : Node_Id := N; variable 8965 Current_Node := Sub; 8980 Current_Node := Sub; 9166 Current_Node := Sub; 9292 Current_Node := Rec_Decl; 9348 Current_Node := Sub; 9359 Current_Node := Sub; [all …]
|
H A D | prj-makr.adb | 949 Current_Node : Project_Node_Id := Empty_Node; variable 957 Current_Node := Current_Item_Node (Declaration, Tree); 959 Kind_Of_Node := Kind_Of (Current_Node, Tree); 964 Name := Prj.Tree.Name_Of (Current_Node, Tree); 972 Tree.Project_Nodes.Table (Current_Node).Comments;
|
H A D | sem_util.adb | 4774 Current_Node : Node_Id; variable 4777 Current_Node := N; 4778 while Present (Current_Node) 4779 and then Nkind (Current_Node) /= N_Compilation_Unit 4781 Current_Node := Parent (Current_Node); 4784 if Nkind (Current_Node) /= N_Compilation_Unit then 4787 return Current_Node;
|