跳转至内容

Ada 编程/库/Ada.Wide_Wide_Text_IO.Wide_Wide_Unbounded_IO

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

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

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

Ada.Wide_Wide_Text_IO.Wide_Wide_Unbounded_IO 是自 Ada 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.Strings.Wide_Wide_Unbounded;

package Ada.Wide_Wide_Text_IO.Wide_Wide_Unbounded_IO is

   procedure Put
     (File : in File_Type;
      Item : in Strings.Wide_Wide_Unbounded.Wide_Wide_Unbounded_String);

   procedure Put
     (Item : in Strings.Wide_Wide_Unbounded.Wide_Wide_Unbounded_String);

   procedure Put_Line
     (File : in File_Type;
      Item : in Strings.Wide_Wide_Unbounded.Wide_Wide_Unbounded_String);

   procedure Put_Line
     (Item : in Strings.Wide_Wide_Unbounded.Wide_Wide_Unbounded_String);

   function Get_Line
     (File : in File_Type)
     return Strings.Wide_Wide_Unbounded.Wide_Wide_Unbounded_String;

   function Get_Line
     return Strings.Wide_Wide_Unbounded.Wide_Wide_Unbounded_String;

   procedure Get_Line
     (File : in File_Type;
      Item : out Strings.Wide_Wide_Unbounded.Wide_Wide_Unbounded_String);

   procedure Get_Line
     (Item : out Strings.Wide_Wide_Unbounded.Wide_Wide_Unbounded_String);

end Ada.Wide_Wide_Text_IO.Wide_Wide_Unbounded_IO;

维基教科书

[编辑 | 编辑源代码]

外部示例

[编辑源代码]

Ada 语言参考手册

[编辑 | 编辑源代码]

开源实现

[编辑 | 编辑源代码]

FSF GNAT

华夏公益教科书