OSDN Git Service

(none)
[hos/hos-v4a.git] / kernel / include / object / tskobj.h
index f3217d6..6ec6054 100755 (executable)
@@ -4,7 +4,7 @@
  * @file  knl_que.h
  * @brief %jp{タスクブジェクトのヘッダファイル}%en{task object heder file}
  *
- * @version $Id: tskobj.h,v 1.3 2006-09-03 14:09:03 ryuz Exp $
+ * @version $Id: tskobj.h,v 1.4 2006-09-03 15:10:01 ryuz Exp $
  *
  * Copyright (C) 1998-2006 by Project HOS
  * http://sourceforge.jp/projects/hos/
@@ -746,7 +746,6 @@ extern  _KERNEL_T_TCB                                       *_kernel_tcb_tbl[];                                                                             /**< %jp{タスクコン
 #endif
 
 
-
 /* ------------------------------------------ */
 /*   Accessor for TCB                         */
 /* ------------------------------------------ */
@@ -944,6 +943,20 @@ extern  _KERNEL_T_TCB                                      *_kernel_tcb_tbl[];                                                                             /**< %jp{タスクコン
 #endif
 
 
+/* ------------------------------------------ */
+/*   Macro functions                          */
+/* ------------------------------------------ */
+
+#if _KERNEL_TCB_TSKSTAT
+#define _KERNEL_TSK_SNS_RDY(tcb)       (_KERNEL_TSK_GET_TSKSTAT(tcb) == _KERNEL_TTS_RDY)
+#define _KERNEL_TSK_SNS_WAI(tcb)       (_KERNEL_TSK_GET_TSKSTAT(tcb) & _KERNEL_TTS_WAI)
+#define _KERNEL_TSK_SNS_SUS(tcb)       (_KERNEL_TSK_GET_TSKSTAT(tcb) & _KERNEL_TTS_SUS)
+#else
+#define _KERNEL_TSK_SNS_RDY(tcb)       ()
+#define _KERNEL_TSK_SNS_WAI(tcb)       ()
+#define _KERNEL_TSK_SNS_SUS(tcb)       (_KERNEL_TSK_GET_SUSCNT(tcb) > 0)
+#endif
+
 
 #ifdef __cplusplus
 extern "C" {