X-Git-Url: https://ncurses.scripts.mit.edu/?p=ncurses.git;a=blobdiff_plain;f=doc%2Fhtml%2Fada%2Fterminal_interface-curses-text_io__ads.htm;h=3d1daf34bd37acab7294701d5305e69702535e52;hp=dca55d24931b022e836f66c061c92303ea80ebd5;hb=f9d358b4f3cf9b44727a0ee5c08f8ca6ae4e3821;hpb=55ccd2b959766810cf7db8d1c4462f338ce0afc8
diff --git a/doc/html/ada/terminal_interface-curses-text_io__ads.htm b/doc/html/ada/terminal_interface-curses-text_io__ads.htm
index dca55d24..3d1daf34 100644
--- a/doc/html/ada/terminal_interface-curses-text_io__ads.htm
+++ b/doc/html/ada/terminal_interface-curses-text_io__ads.htm
@@ -12,7 +12,7 @@
-- S P E C --
-- --
------------------------------------------------------------------------------
--- Copyright (c) 1998 Free Software Foundation, Inc. --
+-- Copyright (c) 1998-2003,2009 Free Software Foundation, Inc. --
-- --
-- Permission is hereby granted, free of charge, to any person obtaining a --
-- copy of this software and associated documentation files (the --
@@ -40,13 +40,13 @@
------------------------------------------------------------------------------
-- Author: Juergen Pfeifer, 1996
-- Version Control:
--- @Revision: 1.13 @
+-- @Revision: 1.14 @
-- Binding Version 01.00
------------------------------------------------------------------------------
with Ada.Text_IO;
with Ada.IO_Exceptions;
-package Terminal_Interface.Curses.Text_IO is
+package Terminal_Interface.Curses.Text_IO is
use type Ada.Text_IO.Count;
subtype Count is Ada.Text_IO.Count;
@@ -61,13 +61,13 @@
-- type parameter. They will operate on a default window, which can
-- be set by the user. It is initially equal to Standard_Window.
- procedure Set_Window (Win : in Window);
+ procedure Set_Window (Win : Window);
-- Set Win as the default window
function Get_Window return Window;
-- Get the current default window
- procedure Flush (Win : in Window);
+ procedure Flush (Win : Window);
procedure Flush;
--------------------------------------------
@@ -79,53 +79,53 @@
-- A scroll-window is interpreted as an page with unbounded page length,
-- i.e. it returns the conventional 0 as page length.
- function Line_Length (Win : in Window) return Count;
+ function Line_Length (Win : Window) return Count;
function Line_Length return Count;
- function Page_Length (Win : in Window) return Count;
+ function Page_Length (Win : Window) return Count;
function Page_Length return Count;
------------------------------------
-- Column, Line, and Page Control --
------------------------------------
- procedure New_Line (Win : in Window; Spacing : in Positive_Count := 1);
- procedure New_Line (Spacing : in Positive_Count := 1);
+ procedure New_Line (Win : Window; Spacing : Positive_Count := 1);
+ procedure New_Line (Spacing : Positive_Count := 1);
- procedure New_Page (Win : in Window);
+ procedure New_Page (Win : Window);
procedure New_Page;
- procedure Set_Col (Win : in Window; To : in Positive_Count);
- procedure Set_Col (To : in Positive_Count);
+ procedure Set_Col (Win : Window; To : Positive_Count);
+ procedure Set_Col (To : Positive_Count);
- procedure Set_Line (Win : in Window; To : in Positive_Count);
- procedure Set_Line (To : in Positive_Count);
+ procedure Set_Line (Win : Window; To : Positive_Count);
+ procedure Set_Line (To : Positive_Count);
- function Col (Win : in Window) return Positive_Count;
+ function Col (Win : Window) return Positive_Count;
function Col return Positive_Count;
- function Line (Win : in Window) return Positive_Count;
+ function Line (Win : Window) return Positive_Count;
function Line return Positive_Count;
-----------------------
-- Characters-Output --
-----------------------
- procedure Put (Win : in Window; Item : in Character);
- procedure Put (Item : in Character);
+ procedure Put (Win : Window; Item : Character);
+ procedure Put (Item : Character);
--------------------
-- Strings-Output --
--------------------
- procedure Put (Win : in Window; Item : in String);
- procedure Put (Item : in String);
+ procedure Put (Win : Window; Item : String);
+ procedure Put (Item : String);
procedure Put_Line
- (Win : in Window;
- Item : in String);
+ (Win : Window;
+ Item : String);
procedure Put_Line
- (Item : in String);
+ (Item : String);
-- Exceptions
@@ -138,5 +138,5 @@
Data_Error : exception renames Ada.IO_Exceptions.Data_Error;
Layout_Error : exception renames Ada.IO_Exceptions.Layout_Error;
-end Terminal_Interface.Curses.Text_IO;
+end Terminal_Interface.Curses.Text_IO;