X-Git-Url: https://ncurses.scripts.mit.edu/?p=ncurses.git;a=blobdiff_plain;f=doc%2Fhtml%2Fada%2Fterminal_interface-curses-putwin__adb.htm;h=8f1f98704ca59593bf745623d0a25ab4d5c8e0e1;hp=8ff5608f18b1a1eda09de6b9c7a3912da5371fcc;hb=027ae42953e3186daed8f3882da73de48291b606;hpb=55ccd2b959766810cf7db8d1c4462f338ce0afc8
diff --git a/doc/html/ada/terminal_interface-curses-putwin__adb.htm b/doc/html/ada/terminal_interface-curses-putwin__adb.htm
index 8ff5608f..8f1f9870 100644
--- a/doc/html/ada/terminal_interface-curses-putwin__adb.htm
+++ b/doc/html/ada/terminal_interface-curses-putwin__adb.htm
@@ -44,19 +44,19 @@
-- Binding Version 01.00
with Ada.Streams.Stream_IO.C_Streams;
-with Interfaces.C_Streams;
-with Terminal_Interface.Curses.Aux; use Terminal_Interface.Curses.Aux;
+with Interfaces.C_Streams;
+with Terminal_Interface.Curses.Aux; use Terminal_Interface.Curses.Aux;
-package body Terminal_Interface.Curses.PutWin is
+package body Terminal_Interface.Curses.PutWin is
- package ICS renames Interfaces.C_Streams;
+ package ICS renames Interfaces.C_Streams;
package ACS renames Ada.Streams.Stream_IO.C_Streams;
use type C_Int;
procedure Put_Window (Win : Window;
File : Ada.Streams.Stream_IO.File_Type) is
- function putwin (Win : Window; f : ICS.FILEs) return C_Int;
- pragma Import (C, putwin, "putwin");
+ function putwin (Win : Window; f : ICS.FILEs) return C_Int;
+ pragma Import (C, putwin, "putwin");
R : constant C_Int := putwin (Win, ACS.C_Stream (File));
begin
@@ -67,8 +67,8 @@
function Get_Window (File : Ada.Streams.Stream_IO.File_Type)
return Window is
- function getwin (f : ICS.FILEs) return Window;
- pragma Import (C, getwin, "getwin");
+ function getwin (f : ICS.FILEs) return Window;
+ pragma Import (C, getwin, "getwin");
W : constant Window := getwin (ACS.C_Stream (File));
begin
@@ -79,5 +79,5 @@
end if;
end Get_Window;
-end Terminal_Interface.Curses.PutWin;
+end Terminal_Interface.Curses.PutWin;