mirror of
https://gitlab.rtems.org/rtems/rtos/rtems.git
synced 2025-12-20 20:12:26 +08:00
Switched to proper types for booleans and increased the stack space
for the tasks in this test.
This commit is contained in:
@@ -51,7 +51,7 @@ package body SPTEST is
|
|||||||
RTEMS.TASK_CREATE(
|
RTEMS.TASK_CREATE(
|
||||||
SPTEST.TASK_NAME( 1 ),
|
SPTEST.TASK_NAME( 1 ),
|
||||||
1,
|
1,
|
||||||
2048,
|
RTEMS.MINIMUM_STACK_SIZE * 2,
|
||||||
RTEMS.DEFAULT_MODES,
|
RTEMS.DEFAULT_MODES,
|
||||||
RTEMS.DEFAULT_ATTRIBUTES,
|
RTEMS.DEFAULT_ATTRIBUTES,
|
||||||
SPTEST.TASK_ID( 1 ),
|
SPTEST.TASK_ID( 1 ),
|
||||||
@@ -62,7 +62,7 @@ package body SPTEST is
|
|||||||
RTEMS.TASK_CREATE(
|
RTEMS.TASK_CREATE(
|
||||||
SPTEST.TASK_NAME( 2 ),
|
SPTEST.TASK_NAME( 2 ),
|
||||||
1,
|
1,
|
||||||
2048,
|
RTEMS.MINIMUM_STACK_SIZE * 2,
|
||||||
RTEMS.DEFAULT_MODES,
|
RTEMS.DEFAULT_MODES,
|
||||||
RTEMS.DEFAULT_ATTRIBUTES,
|
RTEMS.DEFAULT_ATTRIBUTES,
|
||||||
SPTEST.TASK_ID( 2 ),
|
SPTEST.TASK_ID( 2 ),
|
||||||
@@ -201,7 +201,8 @@ package body SPTEST is
|
|||||||
end loop;
|
end loop;
|
||||||
|
|
||||||
if SPTEST.TIMER_GOT_THIS_ID = SPTEST.TIMER_ID( 1 ) and then
|
if SPTEST.TIMER_GOT_THIS_ID = SPTEST.TIMER_ID( 1 ) and then
|
||||||
SPTEST.TIMER_GOT_THIS_POINTER = SPTEST.TASK_1'ADDRESS then
|
RTEMS.ARE_EQUAL(SPTEST.TIMER_GOT_THIS_POINTER,
|
||||||
|
SPTEST.TASK_1'ADDRESS) then
|
||||||
|
|
||||||
TEXT_IO.PUT_LINE( "TA1 - timer routine got the correct arguments" );
|
TEXT_IO.PUT_LINE( "TA1 - timer routine got the correct arguments" );
|
||||||
|
|
||||||
|
|||||||
@@ -46,7 +46,7 @@ package SPTEST is
|
|||||||
-- been sent from an ISR to the executing task.
|
-- been sent from an ISR to the executing task.
|
||||||
--
|
--
|
||||||
|
|
||||||
SIGNAL_SENT : RTEMS.BOOLEAN;
|
SIGNAL_SENT : BOOLEAN;
|
||||||
pragma volatile( SIGNAL_SENT );
|
pragma volatile( SIGNAL_SENT );
|
||||||
|
|
||||||
--
|
--
|
||||||
@@ -64,7 +64,7 @@ package SPTEST is
|
|||||||
-- and was passed the correct signal set.
|
-- and was passed the correct signal set.
|
||||||
--
|
--
|
||||||
|
|
||||||
ASR_FIRED : RTEMS.BOOLEAN;
|
ASR_FIRED : BOOLEAN;
|
||||||
pragma volatile( ASR_FIRED );
|
pragma volatile( ASR_FIRED );
|
||||||
|
|
||||||
--
|
--
|
||||||
|
|||||||
Reference in New Issue
Block a user