Switched to proper types for booleans and increased the stack space

for the tasks in this test.
This commit is contained in:
Joel Sherrill
1997-06-03 18:06:46 +00:00
parent 87e951a21d
commit 9bec37b866
2 changed files with 6 additions and 5 deletions

View File

@@ -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" );

View File

@@ -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 );
-- --