source: rtems/testsuites/sptests/sp05/task3.c @ ac7d5ef0

4.104.114.84.9
Last change on this file since ac7d5ef0 was ac7d5ef0, checked in by Joel Sherrill <joel.sherrill@…>, on May 11, 1995 at 5:39:37 PM

Initial revision

  • Property mode set to 100644
File size: 1.0 KB
Line 
1/*  Task_3
2 *
3 *  This routine serves as a test task.  Makes sure a task can suspend
4 *  itself.
5 *
6 *  Input parameters:
7 *    argument - task argument
8 *
9 *  Output parameters:  NONE
10 *
11 *  COPYRIGHT (c) 1989, 1990, 1991, 1992, 1993, 1994.
12 *  On-Line Applications Research Corporation (OAR).
13 *  All rights assigned to U.S. Government, 1994.
14 *
15 *  This material may be reproduced by or for the U.S. Government pursuant
16 *  to the copyright license under the clause at DFARS 252.227-7013.  This
17 *  notice must appear in all copies of this file and its derivatives.
18 *
19 *  $Id$
20 */
21
22#include "system.h"
23
24rtems_task Task_3(
25  rtems_task_argument argument
26)
27{
28  rtems_status_code status;
29
30  puts( "TA3 - rtems_task_suspend - suspend self" );
31  status = rtems_task_suspend( RTEMS_SELF );
32  directive_failed( status, "rtems_task_suspend of TA3" );
33
34  while( FOREVER ) {
35    puts( "TA3 - rtems_task_wake_after - sleep 1 second" );
36    status = rtems_task_wake_after( 1*TICKS_PER_SECOND );
37    directive_failed( status, "rtems_task_wake_after of TA3" );
38  }
39}
Note: See TracBrowser for help on using the repository browser.