Home
last modified time | relevance | path

Searched refs:Rules_Used (Results 1 – 3 of 3) sorted by relevance

/dports/lang/adacontrol/adactl-1.18r9/src/
H A Drules-side_effect_parameters.adb72 Rules_Used : Control_Index := 0; variable
112 if Rules_Used = Control_Index'Last then
119 Rules_Used := Rules_Used + 1;
125 Entity_Context'(Basic.New_Context (Ctl_Kind, Ctl_Label) with Rules_Used),
139 Rules_Used := 0;
142 Save_Used := Rules_Used;
143 Rules_Used := 0;
145 Rules_Used := Save_Used;
315 if Rules_Used = 0 then
H A Drules-unsafe_paired_calls.adb71 Rules_Used : Control_Index := 0; variable
135 Rules_Set (Rules_Used) := True;
140 SP_Context (Existing).Rule_Numbers (Rules_Used) := True;
146 if Rules_Used = Control_Index_Set'Last then
152 Rules_Used := Rules_Used + 1;
191 Rules_Used := 0;
194 Save_Used := Rules_Used;
195 Rules_Used := 0;
197 Rules_Used := Save_Used;
207 if Rules_Used = 0 then
[all …]
H A Drules-global_references.adb114 Rules_Used : Control_Index := 0; variable
228 Rules_Used := Rules_Used + 1;
247 Key => Rules_Used,
251 Body_Context'(Rule_Inx => Rules_Used),
266 Rules_Used := 0;
270 Save_Used := Rules_Used;
271 Rules_Used := 0;
273 Rules_Used := Save_Used;
666 if Rules_Used = 0 then
797 if Rules_Used = 0 then