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
8949688b
Commit
8949688b
authored
Oct 06, 2019
by
yoogx
Browse files
* Generate an error if data size is not set
For openaadl/ocarina#233
parent
1efde028
Changes
1
Hide whitespace changes
Inline
Side-by-side
src/backends/air_conf/ocarina-backends-air_conf-partitions.adb
View file @
8949688b
...
...
@@ -299,6 +299,10 @@ package body Ocarina.Backends.AIR_Conf.Partitions is
-- MaxMessageSize
if
Get_Data_Size
(
Corresponding_Instance
(
F
))
/=
Null_Size
then
-- If data size is specified, use this value, add
-- 40 to take into account PolyORB-HI/C header
-- (conservative value).
Q
:=
Make_Literal
(
XV
.
New_Numeric_Value
...
...
@@ -309,12 +313,8 @@ package body Ocarina.Backends.AIR_Conf.Partitions is
else
Display_Located_Error
(
Loc
(
F
),
"No data size given for data size, "
&
"assume a value of 1 byte"
,
Fatal
=>
False
,
Warning
=>
True
);
Q
:=
Make_Literal
(
XV
.
New_Numeric_Value
(
1
,
1
,
10
));
"No data size given for data size"
,
Fatal
=>
True
);
end
if
;
Set_Str_To_Name_Buffer
(
"MaxMessageSize"
);
...
...
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