URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Subversion Repositories openrisc_me
[/] [openrisc/] [trunk/] [rtos/] [rtems/] [c/] [src/] [tests/] [samples/] [ticker/] [tasks.c] - Rev 173
Compare with Previous | Blame | View Log
/* Test_task * * This routine serves as a test task. It verifies the basic task * switching capabilities of the executive. * * Input parameters: NONE * * Output parameters: NONE * * COPYRIGHT (c) 1989-1999. * On-Line Applications Research Corporation (OAR). * * 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: tasks.c,v 1.2 2001-09-27 12:02:29 chris Exp $ */ #include "system.h" #include <stdio.h> rtems_task Test_task( rtems_task_argument unused ) { rtems_id tid; rtems_time_of_day time; rtems_unsigned32 task_index; rtems_status_code status; status = rtems_task_ident( RTEMS_SELF, RTEMS_SEARCH_ALL_NODES, &tid ); task_index = task_number( tid ); for ( ; ; ) { status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); if ( time.second >= 3 ) { puts( "*** END OF CLOCK TICK TEST ***" ); exit( 0 ); } put_name( Task_name[ task_index ], FALSE ); print_time( " - rtems_clock_get - ", &time, "\n" ); status = rtems_task_wake_after( task_index * 5 * get_ticks_per_second() ); } }