From 688ecaa0c0cc8fb3752a0b03266fcba5f43a0237 Mon Sep 17 00:00:00 2001 From: Joel Sherrill Date: Tue, 3 Jun 1997 22:08:59 +0000 Subject: Fixed calls to Message_Queue_Create to include maximum message size parameter. --- c/src/ada-tests/tmtests/tm10/tmtest.adb | 1 + c/src/ada-tests/tmtests/tm11/tmtest.adb | 1 + c/src/ada-tests/tmtests/tm12/tmtest.adb | 1 + c/src/ada-tests/tmtests/tm13/tmtest.adb | 1 + c/src/ada-tests/tmtests/tm14/tmtest.adb | 1 + c/src/ada-tests/tmtests/tm21/tmtest.adb | 1 + c/src/ada-tests/tmtests/tm22/tmtest.adb | 1 + c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.adb | 11 ++++++----- c/src/ada-tests/tmtests/tmoverhd/tmtest.adb | 1 + 9 files changed, 14 insertions(+), 5 deletions(-) (limited to 'c/src/ada-tests') diff --git a/c/src/ada-tests/tmtests/tm10/tmtest.adb b/c/src/ada-tests/tmtests/tm10/tmtest.adb index 641bee696f..99e776f311 100644 --- a/c/src/ada-tests/tmtests/tm10/tmtest.adb +++ b/c/src/ada-tests/tmtests/tm10/tmtest.adb @@ -106,6 +106,7 @@ package body TMTEST is RTEMS.MESSAGE_QUEUE_CREATE( 1, TIME_TEST_SUPPORT.OPERATION_COUNT, + 16, RTEMS.DEFAULT_OPTIONS, TMTEST.QUEUE_ID, STATUS diff --git a/c/src/ada-tests/tmtests/tm11/tmtest.adb b/c/src/ada-tests/tmtests/tm11/tmtest.adb index bd799fd877..f93420b3d0 100644 --- a/c/src/ada-tests/tmtests/tm11/tmtest.adb +++ b/c/src/ada-tests/tmtests/tm11/tmtest.adb @@ -97,6 +97,7 @@ package body TMTEST is RTEMS.MESSAGE_QUEUE_CREATE( RTEMS.BUILD_NAME( 'M', 'Q', '1', ' ' ), TIME_TEST_SUPPORT.OPERATION_COUNT, + 16, RTEMS.DEFAULT_OPTIONS, TMTEST.QUEUE_ID, MESSAGE_SIZE, diff --git a/c/src/ada-tests/tmtests/tm12/tmtest.adb b/c/src/ada-tests/tmtests/tm12/tmtest.adb index 8dd56114d9..eb25d84829 100644 --- a/c/src/ada-tests/tmtests/tm12/tmtest.adb +++ b/c/src/ada-tests/tmtests/tm12/tmtest.adb @@ -92,6 +92,7 @@ package body TMTEST is RTEMS.MESSAGE_QUEUE_CREATE( RTEMS.BUILD_NAME( 'M', 'Q', '1', ' ' ), TIME_TEST_SUPPORT.OPERATION_COUNT, + 16, RTEMS.DEFAULT_OPTIONS, TMTEST.QUEUE_ID, STATUS diff --git a/c/src/ada-tests/tmtests/tm13/tmtest.adb b/c/src/ada-tests/tmtests/tm13/tmtest.adb index 312b9cb4f6..c2e989d8b5 100644 --- a/c/src/ada-tests/tmtests/tm13/tmtest.adb +++ b/c/src/ada-tests/tmtests/tm13/tmtest.adb @@ -97,6 +97,7 @@ package body TMTEST is RTEMS.MESSAGE_QUEUE_CREATE( RTEMS.BUILD_NAME( 'M', 'Q', '1', ' ' ), TIME_TEST_SUPPORT.OPERATION_COUNT, + 16, RTEMS.DEFAULT_OPTIONS, TMTEST.QUEUE_ID, MESSAGE_SIZE, diff --git a/c/src/ada-tests/tmtests/tm14/tmtest.adb b/c/src/ada-tests/tmtests/tm14/tmtest.adb index 97f81d5d27..69eeb368eb 100644 --- a/c/src/ada-tests/tmtests/tm14/tmtest.adb +++ b/c/src/ada-tests/tmtests/tm14/tmtest.adb @@ -92,6 +92,7 @@ package body TMTEST is RTEMS.MESSAGE_QUEUE_CREATE( RTEMS.BUILD_NAME( 'M', 'Q', '1', ' ' ), TIME_TEST_SUPPORT.OPERATION_COUNT, + 16, RTEMS.DEFAULT_OPTIONS, TMTEST.QUEUE_ID, STATUS diff --git a/c/src/ada-tests/tmtests/tm21/tmtest.adb b/c/src/ada-tests/tmtests/tm21/tmtest.adb index 7eac1073e9..51ea93cc8b 100644 --- a/c/src/ada-tests/tmtests/tm21/tmtest.adb +++ b/c/src/ada-tests/tmtests/tm21/tmtest.adb @@ -96,6 +96,7 @@ package body TMTEST is RTEMS.MESSAGE_QUEUE_CREATE( INDEX, TIME_TEST_SUPPORT.OPERATION_COUNT, + 16, RTEMS.DEFAULT_ATTRIBUTES, ID, STATUS diff --git a/c/src/ada-tests/tmtests/tm22/tmtest.adb b/c/src/ada-tests/tmtests/tm22/tmtest.adb index e119b6e1c7..6396ea6501 100644 --- a/c/src/ada-tests/tmtests/tm22/tmtest.adb +++ b/c/src/ada-tests/tmtests/tm22/tmtest.adb @@ -49,6 +49,7 @@ package body TMTEST is RTEMS.MESSAGE_QUEUE_CREATE( RTEMS.BUILD_NAME( 'M', 'Q', '1', ' ' ), 0, + 16, RTEMS.DEFAULT_ATTRIBUTES, TMTEST.MESSAGE_QUEUE_ID, STATUS diff --git a/c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.adb b/c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.adb index 15567c476a..c35770fd5d 100644 --- a/c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.adb +++ b/c/src/ada-tests/tmtests/tmoverhd/dummy_rtems.adb @@ -391,11 +391,12 @@ package body DUMMY_RTEMS is -- Message Queue Manager procedure MESSAGE_QUEUE_CREATE ( - NAME : in RTEMS.NAME; - COUNT : in RTEMS.UNSIGNED32; - ATTRIBUTE_SET : in RTEMS.ATTRIBUTE; - ID : out RTEMS.ID; - RESULT : out RTEMS.STATUS_CODES + Name : in RTEMS.Name; + Count : in RTEMS.Unsigned32; + Max_Message_Size : in RTEMS.Unsigned32; + Attribute_Set : in RTEMS.Attribute; + ID : out RTEMS.ID; + Result : out RTEMS.Status_Codes ) is begin diff --git a/c/src/ada-tests/tmtests/tmoverhd/tmtest.adb b/c/src/ada-tests/tmtests/tmoverhd/tmtest.adb index 37484653bb..b1048b3cb9 100644 --- a/c/src/ada-tests/tmtests/tmoverhd/tmtest.adb +++ b/c/src/ada-tests/tmtests/tmoverhd/tmtest.adb @@ -763,6 +763,7 @@ TEST_SUPPORT.PAUSE; DUMMY_RTEMS.MESSAGE_QUEUE_CREATE( NAME, 128, + 16, RTEMS.DEFAULT_ATTRIBUTES, ID, STATUS -- cgit v1.2.3