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
988e5561
Commit
988e5561
authored
Mar 22, 2016
by
yoogx
Browse files
* Minor reformatting
parent
398a3197
Changes
1
Hide whitespace changes
Inline
Side-by-side
src/backends/ocarina-backends-pn-components.adb
View file @
988e5561
...
...
@@ -29,6 +29,8 @@
-- --
------------------------------------------------------------------------------
with
Locations
;
use
Locations
;
with
Ocarina
.
ME_AADL
;
with
Ocarina
.
ME_AADL
.
AADL_Instances
.
Nodes
;
with
Ocarina
.
Namet
;
...
...
@@ -1718,11 +1720,9 @@ package body Ocarina.Backends.PN.Components is
V_Formalism
:
constant
Value_Type
:=
Get_Value_Type
(
Formalism
(
PN_Generated
));
begin
if
Get_Thread_Implementation_Kind
(
Aadl_Instance
)
=
Thread_Unknown
then
Display_Error
(
"Petri Net backend : "
&
"Thread Implementation Unknown
"
,
(
Image
(
AIN
.
Loc
(
Aadl_Instance
))
&
": Unknown thread kind
"
,
True
);
end
if
;
...
...
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