summaryrefslogtreecommitdiffstats
path: root/cpukit/include/adainclude/rtems-message_queue.ads
diff options
context:
space:
mode:
authorSebastian Huber <sebastian.huber@embedded-brains.de>2018-01-23 09:53:06 +0100
committerSebastian Huber <sebastian.huber@embedded-brains.de>2018-01-29 06:58:28 +0100
commitbc96f3b4b889891cb685c4bbcaf12166ca08331c (patch)
treef83b796d2dcc1bfbad1501d8e40a3c4277695e86 /cpukit/include/adainclude/rtems-message_queue.ads
parentada: Fix RTEMS.Time_t (diff)
downloadrtems-bc96f3b4b889891cb685c4bbcaf12166ca08331c.tar.bz2
ada: Introduce RTEMS.Size type
Some time ago the Classic API object size related parameters were changed to use size_t. Reflect this in the Ada bindings. Update #3082.
Diffstat (limited to 'cpukit/include/adainclude/rtems-message_queue.ads')
-rw-r--r--cpukit/include/adainclude/rtems-message_queue.ads10
1 files changed, 5 insertions, 5 deletions
diff --git a/cpukit/include/adainclude/rtems-message_queue.ads b/cpukit/include/adainclude/rtems-message_queue.ads
index d5efe54ffe..929b659d75 100644
--- a/cpukit/include/adainclude/rtems-message_queue.ads
+++ b/cpukit/include/adainclude/rtems-message_queue.ads
@@ -28,7 +28,7 @@ package RTEMS.Message_Queue is
procedure Create (
Name : in RTEMS.Name;
Count : in RTEMS.Unsigned32;
- Max_Message_Size : in RTEMS.Unsigned32;
+ Max_Message_Size : in RTEMS.Size;
Attribute_Set : in RTEMS.Attribute;
ID : out RTEMS.ID;
Result : out RTEMS.Status_Codes
@@ -49,21 +49,21 @@ package RTEMS.Message_Queue is
procedure Send (
ID : in RTEMS.ID;
Buffer : in RTEMS.Address;
- Size : in RTEMS.Unsigned32;
+ Size : in RTEMS.Size;
Result : out RTEMS.Status_Codes
);
procedure Urgent (
ID : in RTEMS.ID;
Buffer : in RTEMS.Address;
- Size : in RTEMS.Unsigned32;
+ Size : in RTEMS.Size;
Result : out RTEMS.Status_Codes
);
procedure Broadcast (
ID : in RTEMS.ID;
Buffer : in RTEMS.Address;
- Size : in RTEMS.Unsigned32;
+ Size : in RTEMS.Size;
Count : out RTEMS.Unsigned32;
Result : out RTEMS.Status_Codes
);
@@ -73,7 +73,7 @@ package RTEMS.Message_Queue is
Buffer : in RTEMS.Address;
Option_Set : in RTEMS.Option;
Timeout : in RTEMS.Interval;
- Size : in out RTEMS.Unsigned32;
+ Size : in out RTEMS.Size;
Result : out RTEMS.Status_Codes
);