跳转到内容

Ada 编程/库/Ada.Task_Identification

来自维基教科书,开放世界中的开放书籍

Ada. Time-tested, safe and secure.
Ada. 经久考验,安全可靠。

此语言特性从 Ada 95 开始可用。

Ada.Task_Identification预定义语言环境 自 Ada 95 以来的一个单元。

--                     Standard Ada library specification
--   Copyright (c) 2003-2018 Maxim Reznik <[email protected]>
--   Copyright (c) 2004-2016 AXE Consultants
--   Copyright (c) 2004, 2005, 2006 Ada-Europe
--   Copyright (c) 2000 The MITRE Corporation, Inc.
--   Copyright (c) 1992, 1993, 1994, 1995 Intermetrics, Inc.
--   SPDX-License-Identifier: BSD-3-Clause and LicenseRef-AdaReferenceManual
-- -------------------------------------------------------------------------

package Ada.Task_Identification is
   pragma Preelaborate(Task_Identification);

   type Task_Id is private;
   pragma Preelaborable_Initialization (Task_Id);

   Null_Task_Id : constant Task_Id;

   function  "=" (Left, Right : Task_Id) return Boolean;

   function  Image        (T : Task_Id) return String;

   function  Current_Task return Task_Id;
   procedure Abort_Task   (T : in out Task_Id);

   function  Is_Terminated (T : Task_Id) return Boolean;
   function  Is_Callable   (T : Task_Id) return Boolean;
private
   pragma Import (Ada, Task_Id);
   pragma Import (Ada, Null_Task_Id);
end Ada.Task_Identification;

另请参阅

[编辑 | 编辑源代码]

维基教科书

[编辑 | 编辑源代码]

外部示例

[编辑源代码]

Ada 参考手册

[编辑 | 编辑源代码]

开源实现

[编辑 | 编辑源代码]

FSF GNAT

drake

华夏公益教科书