Mirrors_Framework/rtems
1
0
Fork 0
mirror of https://gitlab.rtems.org/rtems/rtos/rtems.git synced 2025-12-20 20:12:26 +08:00
Code Issues Packages Projects Releases Wiki Activity

Switched to proper types for booleans and increased the stack space

Browse Source 
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
Download Patch File Download Diff File Expand all files Collapse all files

7
c/src/ada-tests/sptests/sp14/sptest.adb
View File

@@ -51,7 +51,7 @@ package body SPTEST is
RTEMS.TASK_CREATE(
SPTEST.TASK_NAME( 1 ),
1,
2048,
RTEMS.MINIMUM_STACK_SIZE * 2,
RTEMS.DEFAULT_MODES,
RTEMS.DEFAULT_ATTRIBUTES,
SPTEST.TASK_ID( 1 ),
@@ -62,7 +62,7 @@ package body SPTEST is
RTEMS.TASK_CREATE(
SPTEST.TASK_NAME( 2 ),
1,
2048,
RTEMS.MINIMUM_STACK_SIZE * 2,
RTEMS.DEFAULT_MODES,
RTEMS.DEFAULT_ATTRIBUTES,
SPTEST.TASK_ID( 2 ),
@@ -201,7 +201,8 @@ package body SPTEST is
end loop;
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" );

4
c/src/ada-tests/sptests/sp14/sptest.ads
View File

@@ -46,7 +46,7 @@ package SPTEST is
-- been sent from an ISR to the executing task.
--
SIGNAL_SENT : RTEMS.BOOLEAN;
SIGNAL_SENT : BOOLEAN;
pragma volatile( SIGNAL_SENT );
--
@@ -64,7 +64,7 @@ package SPTEST is
-- and was passed the correct signal set.
--
ASR_FIRED : RTEMS.BOOLEAN;
ASR_FIRED : BOOLEAN;
pragma volatile( ASR_FIRED );
--