1------------------------------------------------------------------------------
2--                                                                          --
3--                            Matreshka Project                             --
4--                                                                          --
5--                          Ada Modeling Framework                          --
6--                                                                          --
7--                        Runtime Library Component                         --
8--                                                                          --
9------------------------------------------------------------------------------
10--                                                                          --
11-- Copyright © 2012, Vadim Godunko <vgodunko@gmail.com>                     --
12-- All rights reserved.                                                     --
13--                                                                          --
14-- Redistribution and use in source and binary forms, with or without       --
15-- modification, are permitted provided that the following conditions       --
16-- are met:                                                                 --
17--                                                                          --
18--  * Redistributions of source code must retain the above copyright        --
19--    notice, this list of conditions and the following disclaimer.         --
20--                                                                          --
21--  * Redistributions in binary form must reproduce the above copyright     --
22--    notice, this list of conditions and the following disclaimer in the   --
23--    documentation and/or other materials provided with the distribution.  --
24--                                                                          --
25--  * Neither the name of the Vadim Godunko, IE nor the names of its        --
26--    contributors may be used to endorse or promote products derived from  --
27--    this software without specific prior written permission.              --
28--                                                                          --
29-- THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS      --
30-- "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT        --
31-- LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR    --
32-- A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT     --
33-- HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,   --
34-- SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED --
35-- TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR   --
36-- PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF   --
37-- LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING     --
38-- NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS       --
39-- SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.             --
40--                                                                          --
41------------------------------------------------------------------------------
42--  $Revision: 3397 $ $Date: 2012-11-13 07:02:02 +0400 (Tue, 13 Nov 2012) $
43------------------------------------------------------------------------------
44--  This file is generated, don't edit it.
45------------------------------------------------------------------------------
46with AMF.UMLDI.UML_Activity_Diagrams;
47with AMF.UMLDI.UML_Association_End_Labels;
48with AMF.UMLDI.UML_Association_Or_Connector_Or_Link_Shapes;
49with AMF.UMLDI.UML_Class_Diagrams;
50with AMF.UMLDI.UML_Classifier_Shapes;
51with AMF.UMLDI.UML_Compartmentable_Shapes;
52with AMF.UMLDI.UML_Compartments;
53with AMF.UMLDI.UML_Component_Diagrams;
54with AMF.UMLDI.UML_Composite_Structure_Diagrams;
55with AMF.UMLDI.UML_Deployment_Diagrams;
56with AMF.UMLDI.UML_Edges;
57with AMF.UMLDI.UML_Interaction_Diagrams;
58with AMF.UMLDI.UML_Interaction_Table_Labels;
59with AMF.UMLDI.UML_Keyword_Labels;
60with AMF.UMLDI.UML_Labels;
61with AMF.UMLDI.UML_Multiplicity_Labels;
62with AMF.UMLDI.UML_Name_Labels;
63with AMF.UMLDI.UML_Object_Diagrams;
64with AMF.UMLDI.UML_Package_Diagrams;
65with AMF.UMLDI.UML_Profile_Diagrams;
66with AMF.UMLDI.UML_Redefines_Labels;
67with AMF.UMLDI.UML_Shapes;
68with AMF.UMLDI.UML_State_Machine_Diagrams;
69with AMF.UMLDI.UML_State_Shapes;
70with AMF.UMLDI.UML_Stereotype_Property_Value_Labels;
71with AMF.UMLDI.UML_Styles;
72with AMF.UMLDI.UML_Typed_Element_Labels;
73with AMF.UMLDI.UML_Use_Case_Diagrams;
74
75package AMF.Visitors.UMLDI_Iterators is
76
77   pragma Preelaborate;
78
79   type UMLDI_Iterator is limited interface and AMF.Visitors.Abstract_Iterator;
80
81   not overriding procedure Visit_UML_Activity_Diagram
82    (Self    : in out UMLDI_Iterator;
83     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
84     Element : not null AMF.UMLDI.UML_Activity_Diagrams.UMLDI_UML_Activity_Diagram_Access;
85     Control : in out AMF.Visitors.Traverse_Control) is null;
86
87   not overriding procedure Visit_UML_Association_End_Label
88    (Self    : in out UMLDI_Iterator;
89     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
90     Element : not null AMF.UMLDI.UML_Association_End_Labels.UMLDI_UML_Association_End_Label_Access;
91     Control : in out AMF.Visitors.Traverse_Control) is null;
92
93   not overriding procedure Visit_UML_Association_Or_Connector_Or_Link_Shape
94    (Self    : in out UMLDI_Iterator;
95     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
96     Element : not null AMF.UMLDI.UML_Association_Or_Connector_Or_Link_Shapes.UMLDI_UML_Association_Or_Connector_Or_Link_Shape_Access;
97     Control : in out AMF.Visitors.Traverse_Control) is null;
98
99   not overriding procedure Visit_UML_Class_Diagram
100    (Self    : in out UMLDI_Iterator;
101     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
102     Element : not null AMF.UMLDI.UML_Class_Diagrams.UMLDI_UML_Class_Diagram_Access;
103     Control : in out AMF.Visitors.Traverse_Control) is null;
104
105   not overriding procedure Visit_UML_Classifier_Shape
106    (Self    : in out UMLDI_Iterator;
107     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
108     Element : not null AMF.UMLDI.UML_Classifier_Shapes.UMLDI_UML_Classifier_Shape_Access;
109     Control : in out AMF.Visitors.Traverse_Control) is null;
110
111   not overriding procedure Visit_UML_Compartment
112    (Self    : in out UMLDI_Iterator;
113     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
114     Element : not null AMF.UMLDI.UML_Compartments.UMLDI_UML_Compartment_Access;
115     Control : in out AMF.Visitors.Traverse_Control) is null;
116
117   not overriding procedure Visit_UML_Compartmentable_Shape
118    (Self    : in out UMLDI_Iterator;
119     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
120     Element : not null AMF.UMLDI.UML_Compartmentable_Shapes.UMLDI_UML_Compartmentable_Shape_Access;
121     Control : in out AMF.Visitors.Traverse_Control) is null;
122
123   not overriding procedure Visit_UML_Component_Diagram
124    (Self    : in out UMLDI_Iterator;
125     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
126     Element : not null AMF.UMLDI.UML_Component_Diagrams.UMLDI_UML_Component_Diagram_Access;
127     Control : in out AMF.Visitors.Traverse_Control) is null;
128
129   not overriding procedure Visit_UML_Composite_Structure_Diagram
130    (Self    : in out UMLDI_Iterator;
131     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
132     Element : not null AMF.UMLDI.UML_Composite_Structure_Diagrams.UMLDI_UML_Composite_Structure_Diagram_Access;
133     Control : in out AMF.Visitors.Traverse_Control) is null;
134
135   not overriding procedure Visit_UML_Deployment_Diagram
136    (Self    : in out UMLDI_Iterator;
137     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
138     Element : not null AMF.UMLDI.UML_Deployment_Diagrams.UMLDI_UML_Deployment_Diagram_Access;
139     Control : in out AMF.Visitors.Traverse_Control) is null;
140
141   not overriding procedure Visit_UML_Edge
142    (Self    : in out UMLDI_Iterator;
143     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
144     Element : not null AMF.UMLDI.UML_Edges.UMLDI_UML_Edge_Access;
145     Control : in out AMF.Visitors.Traverse_Control) is null;
146
147   not overriding procedure Visit_UML_Interaction_Diagram
148    (Self    : in out UMLDI_Iterator;
149     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
150     Element : not null AMF.UMLDI.UML_Interaction_Diagrams.UMLDI_UML_Interaction_Diagram_Access;
151     Control : in out AMF.Visitors.Traverse_Control) is null;
152
153   not overriding procedure Visit_UML_Interaction_Table_Label
154    (Self    : in out UMLDI_Iterator;
155     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
156     Element : not null AMF.UMLDI.UML_Interaction_Table_Labels.UMLDI_UML_Interaction_Table_Label_Access;
157     Control : in out AMF.Visitors.Traverse_Control) is null;
158
159   not overriding procedure Visit_UML_Keyword_Label
160    (Self    : in out UMLDI_Iterator;
161     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
162     Element : not null AMF.UMLDI.UML_Keyword_Labels.UMLDI_UML_Keyword_Label_Access;
163     Control : in out AMF.Visitors.Traverse_Control) is null;
164
165   not overriding procedure Visit_UML_Label
166    (Self    : in out UMLDI_Iterator;
167     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
168     Element : not null AMF.UMLDI.UML_Labels.UMLDI_UML_Label_Access;
169     Control : in out AMF.Visitors.Traverse_Control) is null;
170
171   not overriding procedure Visit_UML_Multiplicity_Label
172    (Self    : in out UMLDI_Iterator;
173     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
174     Element : not null AMF.UMLDI.UML_Multiplicity_Labels.UMLDI_UML_Multiplicity_Label_Access;
175     Control : in out AMF.Visitors.Traverse_Control) is null;
176
177   not overriding procedure Visit_UML_Name_Label
178    (Self    : in out UMLDI_Iterator;
179     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
180     Element : not null AMF.UMLDI.UML_Name_Labels.UMLDI_UML_Name_Label_Access;
181     Control : in out AMF.Visitors.Traverse_Control) is null;
182
183   not overriding procedure Visit_UML_Object_Diagram
184    (Self    : in out UMLDI_Iterator;
185     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
186     Element : not null AMF.UMLDI.UML_Object_Diagrams.UMLDI_UML_Object_Diagram_Access;
187     Control : in out AMF.Visitors.Traverse_Control) is null;
188
189   not overriding procedure Visit_UML_Package_Diagram
190    (Self    : in out UMLDI_Iterator;
191     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
192     Element : not null AMF.UMLDI.UML_Package_Diagrams.UMLDI_UML_Package_Diagram_Access;
193     Control : in out AMF.Visitors.Traverse_Control) is null;
194
195   not overriding procedure Visit_UML_Profile_Diagram
196    (Self    : in out UMLDI_Iterator;
197     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
198     Element : not null AMF.UMLDI.UML_Profile_Diagrams.UMLDI_UML_Profile_Diagram_Access;
199     Control : in out AMF.Visitors.Traverse_Control) is null;
200
201   not overriding procedure Visit_UML_Redefines_Label
202    (Self    : in out UMLDI_Iterator;
203     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
204     Element : not null AMF.UMLDI.UML_Redefines_Labels.UMLDI_UML_Redefines_Label_Access;
205     Control : in out AMF.Visitors.Traverse_Control) is null;
206
207   not overriding procedure Visit_UML_Shape
208    (Self    : in out UMLDI_Iterator;
209     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
210     Element : not null AMF.UMLDI.UML_Shapes.UMLDI_UML_Shape_Access;
211     Control : in out AMF.Visitors.Traverse_Control) is null;
212
213   not overriding procedure Visit_UML_State_Machine_Diagram
214    (Self    : in out UMLDI_Iterator;
215     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
216     Element : not null AMF.UMLDI.UML_State_Machine_Diagrams.UMLDI_UML_State_Machine_Diagram_Access;
217     Control : in out AMF.Visitors.Traverse_Control) is null;
218
219   not overriding procedure Visit_UML_State_Shape
220    (Self    : in out UMLDI_Iterator;
221     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
222     Element : not null AMF.UMLDI.UML_State_Shapes.UMLDI_UML_State_Shape_Access;
223     Control : in out AMF.Visitors.Traverse_Control) is null;
224
225   not overriding procedure Visit_UML_Stereotype_Property_Value_Label
226    (Self    : in out UMLDI_Iterator;
227     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
228     Element : not null AMF.UMLDI.UML_Stereotype_Property_Value_Labels.UMLDI_UML_Stereotype_Property_Value_Label_Access;
229     Control : in out AMF.Visitors.Traverse_Control) is null;
230
231   not overriding procedure Visit_UML_Style
232    (Self    : in out UMLDI_Iterator;
233     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
234     Element : not null AMF.UMLDI.UML_Styles.UMLDI_UML_Style_Access;
235     Control : in out AMF.Visitors.Traverse_Control) is null;
236
237   not overriding procedure Visit_UML_Typed_Element_Label
238    (Self    : in out UMLDI_Iterator;
239     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
240     Element : not null AMF.UMLDI.UML_Typed_Element_Labels.UMLDI_UML_Typed_Element_Label_Access;
241     Control : in out AMF.Visitors.Traverse_Control) is null;
242
243   not overriding procedure Visit_UML_Use_Case_Diagram
244    (Self    : in out UMLDI_Iterator;
245     Visitor : in out AMF.Visitors.Abstract_Visitor'Class;
246     Element : not null AMF.UMLDI.UML_Use_Case_Diagrams.UMLDI_UML_Use_Case_Diagram_Access;
247     Control : in out AMF.Visitors.Traverse_Control) is null;
248
249end AMF.Visitors.UMLDI_Iterators;
250