source: rtems/c/src/tests/sptests/sp07/tdelete.c @ ac7d5ef0

4.104.114.84.95
Last change on this file since ac7d5ef0 was ac7d5ef0, checked in by Joel Sherrill <joel.sherrill@…>, on 05/11/95 at 17:39:37

Initial revision

  • Property mode set to 100644
File size: 1.0 KB
Line 
1/*  Task_delete_extension
2 *
3 *  This routine is the delete user extension.
4 *
5 *  Input parameters:
6 *    running_task - pointer to running TCB
7 *    deleted_task - pointer to TCB deleted
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_extension Task_delete_extension(
25  rtems_tcb *running_task,
26  rtems_tcb *deleted_task
27)
28{
29  if ( task_number( running_task->Object.id ) > 0 ) {
30    puts_nocr( "TASK_DELETE - " );
31    put_name( Task_name[ task_number( running_task->Object.id ) ], FALSE );
32  }
33  if ( task_number( deleted_task->Object.id ) > 0 ) {
34    puts_nocr( " deleting " );
35    put_name( Task_name[ task_number( deleted_task->Object.id ) ], TRUE );
36  }
37}
Note: See TracBrowser for help on using the repository browser.