sptest.adb: update Semaphore_Create calling sequence

sp12.adb: doubled the initialization task stack size
This commit is contained in:
Joel Sherrill
1997-06-03 15:25:28 +00:00
parent 4c3340ced8
commit e351c26a8e
2 changed files with 8 additions and 1 deletions

View File

@@ -20,6 +20,7 @@
-- $Id$
--
with Interfaces; use Interfaces;
with RTEMS;
with SPTEST;
with TEST_SUPPORT;
@@ -32,7 +33,7 @@ begin
RTEMS.TASK_CREATE(
RTEMS.BUILD_NAME( 'I', 'N', 'I', 'T' ),
1,
RTEMS.MINIMUM_STACK_SIZE,
RTEMS.MINIMUM_STACK_SIZE * 2,
RTEMS.NO_PREEMPT,
RTEMS.DEFAULT_ATTRIBUTES,
INIT_ID,

View File

@@ -68,6 +68,7 @@ package body SPTEST is
SPTEST.SEMAPHORE_NAME( 1 ),
1,
RTEMS.DEFAULT_ATTRIBUTES,
RTEMS.NO_PRIORITY,
SPTEST.SEMAPHORE_ID( 1 ),
STATUS
);
@@ -77,6 +78,7 @@ package body SPTEST is
SPTEST.SEMAPHORE_NAME( 2 ),
0,
RTEMS.PRIORITY,
RTEMS.NO_PRIORITY,
SPTEST.SEMAPHORE_ID( 2 ),
STATUS
);
@@ -86,6 +88,7 @@ package body SPTEST is
SPTEST.SEMAPHORE_NAME( 3 ),
1,
RTEMS.DEFAULT_ATTRIBUTES,
RTEMS.NO_PRIORITY,
SPTEST.SEMAPHORE_ID( 3 ),
STATUS
);
@@ -113,6 +116,7 @@ TEST_SUPPORT.PAUSE;
SPTEST.SEMAPHORE_NAME( 2 ),
0,
RTEMS.BINARY_SEMAPHORE + RTEMS.PRIORITY + RTEMS.INHERIT_PRIORITY,
RTEMS.NO_PRIORITY,
SPTEST.SEMAPHORE_ID( 2 ),
STATUS
);
@@ -134,6 +138,7 @@ TEST_SUPPORT.PAUSE;
SPTEST.SEMAPHORE_NAME( 2 ),
1,
RTEMS.BINARY_SEMAPHORE + RTEMS.PRIORITY + RTEMS.INHERIT_PRIORITY,
RTEMS.NO_PRIORITY,
SPTEST.SEMAPHORE_ID( 2 ),
STATUS
);
@@ -150,6 +155,7 @@ TEST_SUPPORT.PAUSE;
SPTEST.SEMAPHORE_NAME( 2 ),
0,
RTEMS.PRIORITY,
RTEMS.NO_PRIORITY,
SPTEST.SEMAPHORE_ID( 2 ),
STATUS
);