Home - News ( United States | United Kingdom | Italy | Germany ) - Football scores

Showing content from https://en.wikibooks.org/wiki/Ada_Programming/Libraries/Ada.Wide_Text_IO.Complex_IO below:

Ada Programming/Libraries/Ada.Wide_Text_IO.Complex_IO - Wikibooks, open books for an open world

From Wikibooks, open books for an open world

This language feature is available from Ada 95 on.

Ada.Wide_Text_IO.Complex_IO is a unit of the Predefined Language Environment since Ada 95.

--                     Standard Ada library specification
--   Copyright (c) 2003-2018 Maxim Reznik <reznikmm@gmail.com>
--   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.Numerics.Generic_Complex_Types;

generic
   with package Complex_Types is
     new Ada.Numerics.Generic_Complex_Types (<>);
package Ada.Wide_Text_IO.Complex_IO is

   use Complex_Types;

   Default_Fore : Field := 2;
   Default_Aft  : Field := Real'Digits - 1;
   Default_Exp  : Field := 3;

   procedure Get (File  : in  File_Type;
                  Item  : out Complex;
                  Width : in  Field := 0);

   procedure Get (Item  : out Complex;
                  Width : in  Field := 0);

   procedure Put (File : in File_Type;
                  Item : in Complex;
                  Fore : in Field := Default_Fore;
                  Aft  : in Field := Default_Aft;
                  Exp  : in Field := Default_Exp);

   procedure Put (Item : in Complex;
                  Fore : in Field := Default_Fore;
                  Aft  : in Field := Default_Aft;
                  Exp  : in Field := Default_Exp);

   procedure Get (From : in  Wide_String;
                  Item : out Complex;
                  Last : out Positive);

   procedure Put (To   : out Wide_String;
                  Item : in  Complex;
                  Aft  : in  Field := Default_Aft;
                  Exp  : in  Field := Default_Exp);

end Ada.Wide_Text_IO.Complex_IO;

• Ada Programming/Libraries/Ada
• Ada Programming/Input Output

• Search for examples of Ada.Wide_Text_IO.Complex_IO in: Rosetta Code, GitHub (gists), any Alire crate or this Wikibook.
• Search for posts related to Ada.Wide_Text_IO.Complex_IO in: Stack Overflow, comp.lang.ada or any Ada related page.

• G.1.3: Complex Input-Output ^[Annotated]

• G.1.4: The Package Wide_Text_IO.Complex_IO ^[Annotated]

• G.1.4: The Package Wide_Text_IO.Complex_IO ^[Annotated]

FSF GNAT

• Specification: a-wtcoio.ads
• Body: a-wtcoio.adb

drake

• Specification: textio/a-wtcoio.ads

RetroSearch is an open source project built by @garambo | Open a GitHub Issue

Search and Browse the WWW like it's 1997 | Search results from DuckDuckGo

HTML: 3.2 | Encoding: UTF-8 | Version: 0.7.4