跳转到内容

Ada 编程/库/Ada.Dispatching.Round Robin

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

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

此语言特性仅从 Ada 2005 开始提供。

Ada.Dispatching.Round_RobinAda 2005 以来的 预定义语言环境 中的一个单元。

--                     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
-- -------------------------------------------------------------------------

with Ada.Real_Time;
with System;

package Ada.Dispatching.Round_Robin is

   Default_Quantum : constant Ada.Real_Time.Time_Span :=
     implementation_defined;

   procedure Set_Quantum (Pri     : in System.Priority;
                          Quantum : in Ada.Real_Time.Time_Span);

   procedure Set_Quantum (Low     : in System.Priority;
                          High    : in System.Priority;
                          Quantum : in Ada.Real_Time.Time_Span);

   function Actual_Quantum (Pri : in System.Priority)
     return Ada.Real_Time.Time_Span;

   function Is_Round_Robin (Pri : in System.Priority) return Boolean;

end Ada.Dispatching.Round_Robin;

另请参阅

[编辑 | 编辑源代码]

维基教科书

[编辑 | 编辑源代码]

外部示例

[编辑源代码]

Ada 参考手册

[编辑 | 编辑源代码]

开源实现

[编辑 | 编辑源代码]

FSF GNAT


drake

华夏公益教科书