rmv_tml.c

itron

/* ------------------------------------------------------------------------ */
/*  Hyper Operating System V4  μITRON4.0慌屯 Real-Time OS                  */
/*    ITRONカ〖ネル 箕粗瓷妄                                                */
/*                                                                          */
/*                                  Copyright (C) 1998-2002 by Project HOS  */
/*                                  http://sourceforge.jp/projects/hos/     */
/* ------------------------------------------------------------------------ */


#include "knl_tim.h"



/* タイマオブジェクトをリストから猴近 */
void kernel_rmv_tml(
		T_KERNEL_TIM *timobj)	/* 猴近するタイマオブジェクト */
{
	/* 踏判峡なら部もしない */
	if ( timobj->next == NULL )
	{
		return;
	}
	
	/* 浮瑚面のタイマならポインタをずらす(浩掐滦忽) */
	if ( timobj == kernel_tml_ptr )
	{
		if ( timobj->next == kernel_tml_head )
		{
			kernel_tml_ptr = NULL;			/* 琐萨なら、肌のポインタは痰し */
		}
		else
		{
			kernel_tml_ptr = timobj->next;	/* 肌のオブジェクトに败瓢 */
		}
	}
	
	/* リストから猴近 */
	if ( timobj == timobj->next )
	{
		/* リストが鄂になる眷圭 */
		kernel_tml_head = NULL;
	}
	else
	{
		/* 黎片なら黎片疤弥をずらす */
		if ( timobj == kernel_tml_head )
		{
			kernel_tml_head = timobj->next;
		}
		
		/* リストから猴近 */
		timobj->next->prev = timobj->prev;
		timobj->prev->next = timobj->next;
	}

	/* 踏判峡に肋年 */
	timobj->next = NULL;
}


/* ------------------------------------------------------------------------ */
/*  Copyright (C) 1998-2002 by Project HOS                                  */
/* ------------------------------------------------------------------------ */