Skip to content
GitLab
Menu
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Menu
Open sidebar
TASTE
Ocarina
Commits
a439818d
Commit
a439818d
authored
Jul 31, 2018
by
yoogx
Browse files
* Minor reformatting
parent
20a61f8e
Changes
2
Hide whitespace changes
Inline
Side-by-side
src/backends/air_conf/ocarina-backends-air_conf-module.adb
View file @
a439818d
...
...
@@ -143,8 +143,8 @@ package body Ocarina.Backends.AIR_Conf.Module is
if
not
AINU
.
Is_Empty
(
Subcomponents
(
E
))
then
S
:=
First_Node
(
Subcomponents
(
E
));
while
Present
(
S
)
loop
-- Visit
the component instance corresponding to the
-- subcomponent S.
-- Visit
processor subcomponents
if
AINU
.
Is_Processor
(
Corresponding_Instance
(
S
))
then
Visit
(
Corresponding_Instance
(
S
));
end
if
;
...
...
src/backends/stats/ocarina-backends-stats-main.adb
View file @
a439818d
...
...
@@ -352,8 +352,7 @@ package body Ocarina.Backends.Stats.Main is
if
not
AINU
.
Is_Empty
(
Subcomponents
(
E
))
then
S
:=
First_Node
(
Subcomponents
(
E
));
while
Present
(
S
)
loop
-- Visit the component instance corresponding to the
-- subcomponent S.
-- Visit subcomponents
Visit
(
Corresponding_Instance
(
S
));
Current_Parent_Node
:=
My_Current
;
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment