source: rtems/testsuites/sptests/sp05/task3.c @ 03f2154e

4.104.114.84.95
Last change on this file since 03f2154e was 03f2154e, checked in by Joel Sherrill <joel.sherrill@…>, on 04/22/97 at 17:20:27

headers updated to reflect new style copyright notice as part
of switching to the modified GNU GPL.

  • Property mode set to 100644
File size: 965 bytes
RevLine 
[ac7d5ef0]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 *
[03f2154e]11 *  COPYRIGHT (c) 1989-1997.
[ac7d5ef0]12 *  On-Line Applications Research Corporation (OAR).
[03f2154e]13 *  Copyright assigned to U.S. Government, 1994.
[ac7d5ef0]14 *
[03f2154e]15 *  The license and distribution terms for this file may in
16 *  the file LICENSE in this distribution or at
17 *  http://www.OARcorp.com/rtems/license.html.
[ac7d5ef0]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.