From e0991809991a2c5547d45881978212d5efc0e1de Mon Sep 17 00:00:00 2001 From: Joel Sherrill Date: Tue, 9 Nov 1999 23:27:05 +0000 Subject: Merged tests from Task group. --- testsuites/itrontests/itrontask03/task1.c | 59 +++++++++++++++++++++++++++++++ 1 file changed, 59 insertions(+) create mode 100644 testsuites/itrontests/itrontask03/task1.c (limited to 'testsuites/itrontests/itrontask03/task1.c') diff --git a/testsuites/itrontests/itrontask03/task1.c b/testsuites/itrontests/itrontask03/task1.c new file mode 100644 index 0000000000..30a6078956 --- /dev/null +++ b/testsuites/itrontests/itrontask03/task1.c @@ -0,0 +1,59 @@ +/* Task_1 + * + * This routine serves as a test task. It verifies the task manager. + * + * Input parameters: + * argument - task argument + * + * Output parameters: NONE + * + * COPYRIGHT (c) 1989-1998. + * On-Line Applications Research Corporation (OAR). + * Copyright assigned to U.S. Government, 1994. + * + * The license and distribution terms for this file may be + * found in the file LICENSE in this distribution or at + * http://www.OARcorp.com/rtems/license.html. + * + * $Id$ + */ + +#include "system.h" + +void Task_1() +{ + ER status; + PRI previous_priority; + + /* + * XXX - Change to itron routine. + */ + + puts( "TA1 - rtems_task_wake_after - sleep 1 second" ); + status = rtems_task_wake_after( 1*TICKS_PER_SECOND ); + directive_failed( status, "rtems_task_wake_after" ); + + status = chg_pri( TA3_ID , 2 ); + directive_failed( status, "chg_pri" ); + + puts( "TA1 - chg_pri - set TA3's priority to 2" ); + + puts( "TA1 - rtems_task_suspend - suspend TA2" ); + status = sus_tsk( TA2_ID ); + directive_failed( status, "sus_tsk of TA2" ); + + puts( "TA1 - - delete TA2" ); + status = ter_tsk( TA2_ID ); + directive_failed( status, "ter_tsk of TA2" ); + + /* + * XXX - Change to itron routine. + */ + + puts( "TA1 - rtems_task_wake_after - sleep for 5 seconds" ); + status = rtems_task_wake_after( 5*TICKS_PER_SECOND ); + directive_failed( status, "rtems_task_wake_after" ); + + puts( "*** END OF TEST 5 ***" ); + exit( 0 ); +} -- cgit v1.2.3