source: rtems/c/src/exec/itron/src/del_tsk.c @ 9d9a3dd

4.104.114.84.95
Last change on this file since 9d9a3dd was 9d9a3dd, checked in by Jennifer Averett <Jennifer.Averett@…>, on 11/17/99 at 16:47:58

+ Updated copyright information.

  • Property mode set to 100644
File size: 1.2 KB
Line 
1/*
2 *  COPYRIGHT (c) 1989-1999.
3 *  On-Line Applications Research Corporation (OAR).
4 *
5 *  The license and distribution terms for this file may be
6 *  found in the file LICENSE in this distribution or at
7 *  http://www.OARcorp.com/rtems/license.html.
8 *
9 *  $Id$
10 */
11
12#include <itron.h>
13
14#include <rtems/score/thread.h>
15#include <rtems/score/userext.h>
16#include <rtems/score/wkspace.h>
17#include <rtems/score/apiext.h>
18#include <rtems/score/sysstate.h>
19
20#include <rtems/itron/task.h>
21
22
23/*
24 *  del_tsk - Delete Task
25 */
26
27ER del_tsk(
28  ID tskid
29)
30{
31  register Thread_Control *the_thread;
32  Objects_Locations        location;
33  ER                       result = E_OK; /* to avoid warning */
34
35  the_thread = _ITRON_Task_Get( tskid, &location );
36  switch ( location ) {
37    case OBJECTS_REMOTE:
38    case OBJECTS_ERROR:
39      return _ITRON_Task_Clarify_get_id_error( tskid );
40
41    case OBJECTS_LOCAL:
42
43      if ( _Thread_Is_executing( the_thread ) )
44        _ITRON_return_errorno( E_OBJ );
45
46      if ( !_States_Is_dormant( the_thread->current_state ) )
47        _ITRON_return_errorno( E_OBJ );
48
49      result = _ITRON_Delete_task( the_thread );
50      break;
51  }
52
53  _ITRON_return_errorno( result );
54}
55
Note: See TracBrowser for help on using the repository browser.