Changed mode and priority of initialization task.

This commit is contained in:
Joel Sherrill
1997-06-03 19:18:15 +00:00
parent 5687a1e90d
commit d6a9988d25
2 changed files with 2 additions and 5 deletions

View File

@@ -31,16 +31,15 @@ begin
RTEMS.TASK_CREATE(
RTEMS.BUILD_NAME( 'I', 'N', 'I', 'T' ),
1,
10,
RTEMS.MINIMUM_STACK_SIZE,
RTEMS.NO_PREEMPT,
RTEMS.DEFAULT_MODES,
RTEMS.DEFAULT_ATTRIBUTES,
INIT_ID,
STATUS
);
TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "TASK_CREATE OF INIT" );
RTEMS.TASK_START(
INIT_ID,
SPTEST.INIT'ACCESS,

View File

@@ -37,7 +37,6 @@ package body SPTEST is
procedure INIT (
ARGUMENT : in RTEMS.TASK_ARGUMENT
) is
INDEX : RTEMS.UNSIGNED32;
STATUS : RTEMS.STATUS_CODES;
begin
@@ -249,7 +248,6 @@ package body SPTEST is
is
PREVIOUS_MODE : RTEMS.MODE;
STATUS : RTEMS.STATUS_CODES;
INDEX : RTEMS.UNSIGNED32;
begin
RTEMS.TASK_MODE(