跳转到内容

Ada 编程/库/Ada.Strings.Wide_Maps.Wide_Constants

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

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

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

Ada.Strings.Wide_Maps.Wide_Constants预定义语言环境 的一个单元,自 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.Strings.Wide_Maps.Wide_Constants is
   pragma Preelaborate (Wide_Constants);

   Control_Set           : constant Wide_Character_Set;
   Graphic_Set           : constant Wide_Character_Set;
   Letter_Set            : constant Wide_Character_Set;
   Lower_Set             : constant Wide_Character_Set;
   Upper_Set             : constant Wide_Character_Set;
   Basic_Set             : constant Wide_Character_Set;
   Decimal_Digit_Set     : constant Wide_Character_Set;
   Hexadecimal_Digit_Set : constant Wide_Character_Set;
   Alphanumeric_Set      : constant Wide_Character_Set;
   Special_Set           : constant Wide_Character_Set;
   ISO_646_Set           : constant Wide_Character_Set;
   Character_Set         : constant Wide_Character_Set;
   --   Contains each Wide_Character value WC such that
   --   Characters.Conversions.Is_Character(WC) is True

   Lower_Case_Map        : constant Wide_Character_Mapping;
   --   Wide_Maps to lower case for letters, else identity
   Upper_Case_Map        : constant Wide_Character_Mapping;
   --   Wide_Maps to upper case for letters, else identity
   Basic_Map             : constant Wide_Character_Mapping;
   --   Wide_Maps to basic letter for letters, else identity

private

   pragma Import (Ada, Control_Set);
   pragma Import (Ada, Graphic_Set);
   pragma Import (Ada, Letter_Set);
   pragma Import (Ada, Lower_Set);
   pragma Import (Ada, Upper_Set);
   pragma Import (Ada, Basic_Set);
   pragma Import (Ada, Decimal_Digit_Set);
   pragma Import (Ada, Hexadecimal_Digit_Set);
   pragma Import (Ada, Alphanumeric_Set);
   pragma Import (Ada, Special_Set);
   pragma Import (Ada, ISO_646_Set);

   pragma Import (Ada, Lower_Case_Map);
   pragma Import (Ada, Upper_Case_Map);
   pragma Import (Ada, Basic_Map);
   pragma Import (Ada, Character_Set);

end Ada.Strings.Wide_Maps.Wide_Constants;



维基教科书

[编辑 | 编辑源代码]

外部示例

[编辑源代码]

Ada 参考手册

[编辑 | 编辑源代码]

开源实现

[编辑 | 编辑源代码]

FSF GNAT


drake

华夏公益教科书