Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Menu
Open sidebar
TASTE
Ocarina
Commits
bf13c626
Commit
bf13c626
authored
Jan 07, 2015
by
yoogx
Browse files
* Correct name of default root system
parent
088f0be4
Changes
1
Hide whitespace changes
Inline
Side-by-side
src/core/instance/ocarina-instances.adb
View file @
bf13c626
...
...
@@ -6,7 +6,7 @@
-- --
-- B o d y --
-- --
-- Copyright (C) 2005-2009 Telecom ParisTech, 2010-201
4
ESA & ISAE. --
-- Copyright (C) 2005-2009 Telecom ParisTech, 2010-201
5
ESA & ISAE. --
-- --
-- Ocarina is free software; you can redistribute it and/or modify --
-- it under terms of the GNU General Public License as published by the --
...
...
@@ -210,7 +210,7 @@ package body Ocarina.Instances is
Root_System_Name
then
Error_Name
(
1
)
:=
Root_System_Name
;
Error_Name
(
2
)
:=
ATE
.
Get_Name_Of_Entity
(
List_Node
);
Error_Name
(
2
)
:=
ATE
.
Get_Name_Of_Entity
(
Root_System
);
DE
(
"system % is not a root system, use %"
);
Root_System
:=
No_Node
;
Exit_On_Error
(
True
,
"Cannot instantiate AADL model"
);
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new 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