Subversion Repositories openrisc_me

/*
 *  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: exd_tsk.c,v 1.2 2001-09-27 11:59:13 chris Exp $
 */
 
#include <itron.h>
#include <assert.h>
 
#include <rtems/score/thread.h>
#include <rtems/score/userext.h>
#include <rtems/score/wkspace.h>
#include <rtems/score/apiext.h>
#include <rtems/score/sysstate.h>
 
#include <rtems/itron/task.h>
 
/*
 *  exd_tsk - Exit and Delete Task
 */
 
void exd_tsk( void )
{
  Objects_Information     *the_information;
 
  _Thread_Disable_dispatch();
 
  the_information = _Objects_Get_information( _Thread_Executing->Object.id );
 
  /* This should never happen if _Thread_Get() works right */
  assert( the_information );
 
  _Thread_Set_state( _Thread_Executing, STATES_DORMANT );
  _ITRON_Delete_task( _Thread_Executing );
 
  _Thread_Enable_dispatch();
}