Ada 编程/库/Ada.Strings.UTF_Encoding
外观
此语言特性已在 Ada 2012 中引入。
Ada.Strings.UTF_Encoding 是自 Ada 2012 以来 预定义语言环境 的一个单元。
-- Standard Ada library specification -- 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.UTF_Encodingis
pragma
Pure (UTF_Encoding); -- Declarations common to the string encoding packagestype
Encoding_Schemeis
(UTF_8, UTF_16BE, UTF_16LE);subtype
UTF_Stringis
String;subtype
UTF_8_Stringis
String;subtype
UTF_16_Wide_Stringis
Wide_String; Encoding_Error :exception
; BOM_8 :constant
UTF_8_String := Character'Val(16#EF#) & Character'Val(16#BB#) & Character'Val(16#BF#); BOM_16BE :constant
UTF_String := Character'Val(16#FE#) & Character'Val(16#FF#); BOM_16LE :constant
UTF_String := Character'Val(16#FF#) & Character'Val(16#FE#); BOM_16 :constant
UTF_16_Wide_String := (1 => Wide_Character'Val(16#FEFF#));function
Encoding (Item : UTF_String; Default : Encoding_Scheme := UTF_8)return
Encoding_Scheme;end
Ada.Strings.UTF_Encoding;
外部示例
[编辑源代码]- 在以下位置搜索 示例 的
Ada.Strings.UTF_Encoding
:Rosetta Code,GitHub (gists),任何 Alire 仓库 或 此维基教科书。 - 在以下位置搜索与
Ada.Strings.UTF_Encoding
相关的 帖子:Stack Overflow,comp.lang.ada 或 任何与 Ada 相关的页面。
FSF GNAT
- 规范:a-stuten.ads
- 主体:a-stuten.adb
drake