Home
last modified time | relevance | path

Searched refs:Current_Node (Results 1 – 25 of 182) sorted by path

12345678

/dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/ada/
H A DChangeLog-20171610 * 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 Derrout.adb310 Error_Msg (Msg, Flag_Location, Current_Node);
H A Derrout.ads71 Current_Node : Node_Id := Empty; variable
H A Dexp_ch9.adb322 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 Dpar-ch6.adb339 Current_Node := Name_Node;
H A Dpar-ch7.adb149 Current_Node := Name_Node;
215 Current_Node := Name_Node;
H A Dpar-ch9.adb104 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 Dpar-util.adb673 Current_Node := Scope.Table (Scope.Last).Labl;
H A Dsem_util.adb6537 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 Dahven-framework.adb746 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 Dahven-slist.adb50 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 Dahven-framework.adb121 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 Dahven-slist.adb50 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 DChangeLog-20171610 * 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 Derrout.adb310 Error_Msg (Msg, Flag_Location, Current_Node);
H A Derrout.ads71 Current_Node : Node_Id := Empty; variable
H A Dexp_ch9.adb322 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 Dpar-ch6.adb339 Current_Node := Name_Node;
H A Dpar-ch7.adb149 Current_Node := Name_Node;
215 Current_Node := Name_Node;
H A Dpar-ch9.adb104 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 Dpar-util.adb673 Current_Node := Scope.Table (Scope.Last).Labl;
H A Dsem_util.adb6537 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 Dexp_ch9.adb322 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 Dprj-makr.adb949 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 Dsem_util.adb4774 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;

12345678