ncurses 5.6 - patch 20070505
[ncurses.git] / doc / html / ada / terminal_interface-curses__ads.htm
1 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
2 <HTML><HEAD><TITLE>terminal_interface-curses.ads</TITLE></HEAD>
3 <BODY>
4 <HR><DIV ALIGN="center"><H1> File : terminal_interface-curses.ads </H1></DIV><HR>
5 <PRE>
6
7 <FONT COLOR=green><EM>------------------------------------------------------------------------------</EM></FONT>
8 <FONT COLOR=green><EM>--                                                                          --</EM></FONT>
9 <FONT COLOR=green><EM>--                           <A HREF="http://www.gnat.com">GNAT</A> ncurses Binding                           --</EM></FONT>
10 <FONT COLOR=green><EM>--                                                                          --</EM></FONT>
11 <FONT COLOR=green><EM>--                         Terminal_Interface.Curses                        --</EM></FONT>
12 <FONT COLOR=green><EM>--                                                                          --</EM></FONT>
13 <FONT COLOR=green><EM>--                                 S P E C                                  --</EM></FONT>
14 <FONT COLOR=green><EM>--                                                                          --</EM></FONT>
15 <FONT COLOR=green><EM>------------------------------------------------------------------------------</EM></FONT>
16 <FONT COLOR=green><EM>-- Copyright (c) 1998-2006,2007 Free Software Foundation, Inc.              --</EM></FONT>
17 <FONT COLOR=green><EM>--                                                                          --</EM></FONT>
18 <FONT COLOR=green><EM>-- Permission is hereby granted, free of charge, to any person obtaining a  --</EM></FONT>
19 <FONT COLOR=green><EM>-- copy of this software and associated documentation files (the            --</EM></FONT>
20 <FONT COLOR=green><EM>-- "Software"), to deal in the Software without restriction, including      --</EM></FONT>
21 <FONT COLOR=green><EM>-- without limitation the rights to use, copy, modify, merge, publish,      --</EM></FONT>
22 <FONT COLOR=green><EM>-- distribute, distribute with modifications, sublicense, and/or sell       --</EM></FONT>
23 <FONT COLOR=green><EM>-- copies of the Software, and to permit persons to whom the Software is    --</EM></FONT>
24 <FONT COLOR=green><EM>-- furnished to do so, subject to the following conditions:                 --</EM></FONT>
25 <FONT COLOR=green><EM>--                                                                          --</EM></FONT>
26 <FONT COLOR=green><EM>-- The above copyright notice and this permission notice shall be included  --</EM></FONT>
27 <FONT COLOR=green><EM>-- in all copies or substantial portions of the Software.                   --</EM></FONT>
28 <FONT COLOR=green><EM>--                                                                          --</EM></FONT>
29 <FONT COLOR=green><EM>-- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS  --</EM></FONT>
30 <FONT COLOR=green><EM>-- OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF               --</EM></FONT>
31 <FONT COLOR=green><EM>-- MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.   --</EM></FONT>
32 <FONT COLOR=green><EM>-- IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,   --</EM></FONT>
33 <FONT COLOR=green><EM>-- DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR    --</EM></FONT>
34 <FONT COLOR=green><EM>-- OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR    --</EM></FONT>
35 <FONT COLOR=green><EM>-- THE USE OR OTHER DEALINGS IN THE SOFTWARE.                               --</EM></FONT>
36 <FONT COLOR=green><EM>--                                                                          --</EM></FONT>
37 <FONT COLOR=green><EM>-- Except as contained in this notice, the name(s) of the above copyright   --</EM></FONT>
38 <FONT COLOR=green><EM>-- holders shall not be used in advertising or otherwise to promote the     --</EM></FONT>
39 <FONT COLOR=green><EM>-- sale, use or other dealings in this Software without prior written       --</EM></FONT>
40 <FONT COLOR=green><EM>-- authorization.                                                           --</EM></FONT>
41 <FONT COLOR=green><EM>------------------------------------------------------------------------------</EM></FONT>
42 <FONT COLOR=green><EM>--  Author:  Juergen Pfeifer, 1996</EM></FONT>
43 <FONT COLOR=green><EM>--  Version Control:</EM></FONT>
44 <FONT COLOR=green><EM>--  @Revision: 1.40 @</EM></FONT>
45 <FONT COLOR=green><EM>--  @Date: 2007/05/05 18:00:12 @</EM></FONT>
46 <FONT COLOR=green><EM>--  Binding Version 01.00</EM></FONT>
47 <FONT COLOR=green><EM>------------------------------------------------------------------------------</EM></FONT>
48 <FONT COLOR=green><EM>--  curses binding.</EM></FONT>
49 <FONT COLOR=green><EM>--  This module is generated. Please don't change it manually!</EM></FONT>
50 <FONT COLOR=green><EM>--  Run the generator instead.</EM></FONT>
51 <FONT COLOR=green><EM>--  |</EM></FONT>
52 <b>with</b> <A HREF="interfac__ads.htm#ref_38_9">System</A>.Storage_Elements;
53 <b>with</b> Interfaces.C;   <FONT COLOR=green><EM>--  We need this for some assertions.</EM></FONT>
54
55 <b>package</b> Terminal_Interface.Curses <b>is</b>
56    <b>pragma</b> Preelaborate (Terminal_Interface.Curses);
57    <b>pragma</b> Linker_Options ("-lncurses");
58
59    <FONT COLOR=red><A NAME="ref_54_4">NC_Major_Version</A></FONT> : <b>constant</b> := 5; <FONT COLOR=green><EM>--  Major version of the library</EM></FONT>
60    <FONT COLOR=red><A NAME="ref_55_4">NC_Minor_Version</A></FONT> : <b>constant</b> := 6; <FONT COLOR=green><EM>--  Minor version of the library</EM></FONT>
61    NC_Version : <b>constant</b> String := "5.6";  <FONT COLOR=green><EM>--  Version of library</EM></FONT>
62
63    <b>type</b> Window <b>is</b> <b>private</b>;
64    Null_Window : <b>constant</b> Window;
65
66    <b>type</b> <FONT COLOR=red><A NAME="ref_61_9">Line_Position</A></FONT>   <b>is</b> <b>new</b> Natural; <FONT COLOR=green><EM>--  line coordinate</EM></FONT>
67    <b>type</b> Column_Position <b>is</b> <b>new</b> Natural; <FONT COLOR=green><EM>--  column coordinate</EM></FONT>
68
69    <b>subtype</b> Line_Count   <b>is</b> Line_Position   <b>range</b> 1 .. Line_Position'Last;
70    <FONT COLOR=green><EM>--  Type to count lines. We do not allow null windows, so must be positive</EM></FONT>
71    <b>subtype</b> Column_Count <b>is</b> Column_Position <b>range</b> 1 .. Column_Position'Last;
72    <FONT COLOR=green><EM>--  Type to count columns. We do not allow null windows, so must be positive</EM></FONT>
73
74    <b>type</b> Key_Code <b>is</b> <b>new</b> Integer;
75    <FONT COLOR=green><EM>--  That is anything including real characters, special keys and logical</EM></FONT>
76    <FONT COLOR=green><EM>--  request codes.</EM></FONT>
77
78    <FONT COLOR=green><EM>--  FIXME: The "-1" should be Curses_Err</EM></FONT>
79    <b>subtype</b> Real_Key_Code <b>is</b> Key_Code <b>range</b> -1 .. 8#777#;
80    <FONT COLOR=green><EM>--  This are the codes that potentially represent a real keystroke.</EM></FONT>
81    <FONT COLOR=green><EM>--  Not all codes may be possible on a specific terminal. To check the</EM></FONT>
82    <FONT COLOR=green><EM>--  availability of a special key, the Has_Key function is provided.</EM></FONT>
83
84    <b>subtype</b> Special_Key_Code <b>is</b> Real_Key_Code
85      <b>range</b> 8#400# .. Real_Key_Code'Last;
86    <FONT COLOR=green><EM>--  Type for a function- or special key number</EM></FONT>
87
88    <b>subtype</b> Normal_Key_Code <b>is</b> Real_Key_Code <b>range</b>
89      Character'Pos (Character'First) .. Character'Pos (Character'Last);
90    <FONT COLOR=green><EM>--  This are the codes for regular (incl. non-graphical) characters.</EM></FONT>
91
92    <FONT COLOR=green><EM>--  Constants for function- and special keys</EM></FONT>
93    <FONT COLOR=green><EM>--</EM></FONT>
94    <FONT COLOR=red><A NAME="ref_89_4">Key_None</A></FONT>                       : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#400#;
95    <FONT COLOR=red><A NAME="ref_90_4">Key_Code_Yes</A></FONT>                   : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#400#;
96    <FONT COLOR=red><A NAME="ref_91_4">Key_Min</A></FONT>                        : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#401#;
97    <FONT COLOR=red><A NAME="ref_92_4">Key_Break</A></FONT>                      : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#401#;
98    <FONT COLOR=red><A NAME="ref_93_4">Key_Cursor_Down</A></FONT>                : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#402#;
99    <FONT COLOR=red><A NAME="ref_94_4">Key_Cursor_Up</A></FONT>                  : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#403#;
100    <FONT COLOR=red><A NAME="ref_95_4">Key_Cursor_Left</A></FONT>                : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#404#;
101    <FONT COLOR=red><A NAME="ref_96_4">Key_Cursor_Right</A></FONT>               : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#405#;
102    <FONT COLOR=red><A NAME="ref_97_4">Key_Home</A></FONT>                       : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#406#;
103    <FONT COLOR=red><A NAME="ref_98_4">Key_Backspace</A></FONT>                  : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#407#;
104    <FONT COLOR=red><A NAME="ref_99_4">Key_F0</A></FONT>                         : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#410#;
105    <FONT COLOR=red><A NAME="ref_100_4">Key_F1</A></FONT>                         : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#411#;
106    <FONT COLOR=red><A NAME="ref_101_4">Key_F2</A></FONT>                         : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#412#;
107    <FONT COLOR=red><A NAME="ref_102_4">Key_F3</A></FONT>                         : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#413#;
108    <FONT COLOR=red><A NAME="ref_103_4">Key_F4</A></FONT>                         : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#414#;
109    <FONT COLOR=red><A NAME="ref_104_4">Key_F5</A></FONT>                         : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#415#;
110    <FONT COLOR=red><A NAME="ref_105_4">Key_F6</A></FONT>                         : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#416#;
111    <FONT COLOR=red><A NAME="ref_106_4">Key_F7</A></FONT>                         : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#417#;
112    <FONT COLOR=red><A NAME="ref_107_4">Key_F8</A></FONT>                         : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#420#;
113    <FONT COLOR=red><A NAME="ref_108_4">Key_F9</A></FONT>                         : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#421#;
114    <FONT COLOR=red><A NAME="ref_109_4">Key_F10</A></FONT>                        : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#422#;
115    <FONT COLOR=red><A NAME="ref_110_4">Key_F11</A></FONT>                        : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#423#;
116    <FONT COLOR=red><A NAME="ref_111_4">Key_F12</A></FONT>                        : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#424#;
117    <FONT COLOR=red><A NAME="ref_112_4">Key_F13</A></FONT>                        : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#425#;
118    <FONT COLOR=red><A NAME="ref_113_4">Key_F14</A></FONT>                        : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#426#;
119    <FONT COLOR=red><A NAME="ref_114_4">Key_F15</A></FONT>                        : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#427#;
120    <FONT COLOR=red><A NAME="ref_115_4">Key_F16</A></FONT>                        : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#430#;
121    <FONT COLOR=red><A NAME="ref_116_4">Key_F17</A></FONT>                        : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#431#;
122    <FONT COLOR=red><A NAME="ref_117_4">Key_F18</A></FONT>                        : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#432#;
123    <FONT COLOR=red><A NAME="ref_118_4">Key_F19</A></FONT>                        : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#433#;
124    <FONT COLOR=red><A NAME="ref_119_4">Key_F20</A></FONT>                        : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#434#;
125    <FONT COLOR=red><A NAME="ref_120_4">Key_F21</A></FONT>                        : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#435#;
126    <FONT COLOR=red><A NAME="ref_121_4">Key_F22</A></FONT>                        : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#436#;
127    <FONT COLOR=red><A NAME="ref_122_4">Key_F23</A></FONT>                        : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#437#;
128    <FONT COLOR=red><A NAME="ref_123_4">Key_F24</A></FONT>                        : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#440#;
129    <FONT COLOR=red><A NAME="ref_124_4">Key_Delete_Line</A></FONT>                : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#510#;
130    <FONT COLOR=red><A NAME="ref_125_4">Key_Insert_Line</A></FONT>                : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#511#;
131    <FONT COLOR=red><A NAME="ref_126_4">Key_Delete_Char</A></FONT>                : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#512#;
132    <FONT COLOR=red><A NAME="ref_127_4">Key_Insert_Char</A></FONT>                : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#513#;
133    <FONT COLOR=red><A NAME="ref_128_4">Key_Exit_Insert_Mode</A></FONT>           : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#514#;
134    <FONT COLOR=red><A NAME="ref_129_4">Key_Clear_Screen</A></FONT>               : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#515#;
135    <FONT COLOR=red><A NAME="ref_130_4">Key_Clear_End_Of_Screen</A></FONT>        : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#516#;
136    <FONT COLOR=red><A NAME="ref_131_4">Key_Clear_End_Of_Line</A></FONT>          : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#517#;
137    <FONT COLOR=red><A NAME="ref_132_4">Key_Scroll_1_Forward</A></FONT>           : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#520#;
138    <FONT COLOR=red><A NAME="ref_133_4">Key_Scroll_1_Backward</A></FONT>          : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#521#;
139    <FONT COLOR=red><A NAME="ref_134_4">Key_Next_Page</A></FONT>                  : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#522#;
140    <FONT COLOR=red><A NAME="ref_135_4">Key_Previous_Page</A></FONT>              : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#523#;
141    <FONT COLOR=red><A NAME="ref_136_4">Key_Set_Tab</A></FONT>                    : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#524#;
142    <FONT COLOR=red><A NAME="ref_137_4">Key_Clear_Tab</A></FONT>                  : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#525#;
143    <FONT COLOR=red><A NAME="ref_138_4">Key_Clear_All_Tabs</A></FONT>             : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#526#;
144    <FONT COLOR=red><A NAME="ref_139_4">Key_Enter_Or_Send</A></FONT>              : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#527#;
145    <FONT COLOR=red><A NAME="ref_140_4">Key_Soft_Reset</A></FONT>                 : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#530#;
146    <FONT COLOR=red><A NAME="ref_141_4">Key_Reset</A></FONT>                      : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#531#;
147    <FONT COLOR=red><A NAME="ref_142_4">Key_Print</A></FONT>                      : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#532#;
148    <FONT COLOR=red><A NAME="ref_143_4">Key_Bottom</A></FONT>                     : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#533#;
149    <FONT COLOR=red><A NAME="ref_144_4">Key_Upper_Left_Of_Keypad</A></FONT>       : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#534#;
150    <FONT COLOR=red><A NAME="ref_145_4">Key_Upper_Right_Of_Keypad</A></FONT>      : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#535#;
151    <FONT COLOR=red><A NAME="ref_146_4">Key_Center_Of_Keypad</A></FONT>           : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#536#;
152    <FONT COLOR=red><A NAME="ref_147_4">Key_Lower_Left_Of_Keypad</A></FONT>       : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#537#;
153    <FONT COLOR=red><A NAME="ref_148_4">Key_Lower_Right_Of_Keypad</A></FONT>      : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#540#;
154    <FONT COLOR=red><A NAME="ref_149_4">Key_Back_Tab</A></FONT>                   : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#541#;
155    <FONT COLOR=red><A NAME="ref_150_4">Key_Beginning</A></FONT>                  : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#542#;
156    <FONT COLOR=red><A NAME="ref_151_4">Key_Cancel</A></FONT>                     : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#543#;
157    <FONT COLOR=red><A NAME="ref_152_4">Key_Close</A></FONT>                      : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#544#;
158    <FONT COLOR=red><A NAME="ref_153_4">Key_Command</A></FONT>                    : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#545#;
159    <FONT COLOR=red><A NAME="ref_154_4">Key_Copy</A></FONT>                       : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#546#;
160    <FONT COLOR=red><A NAME="ref_155_4">Key_Create</A></FONT>                     : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#547#;
161    <FONT COLOR=red><A NAME="ref_156_4">Key_End</A></FONT>                        : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#550#;
162    <FONT COLOR=red><A NAME="ref_157_4">Key_Exit</A></FONT>                       : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#551#;
163    <FONT COLOR=red><A NAME="ref_158_4">Key_Find</A></FONT>                       : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#552#;
164    <FONT COLOR=red><A NAME="ref_159_4">Key_Help</A></FONT>                       : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#553#;
165    <FONT COLOR=red><A NAME="ref_160_4">Key_Mark</A></FONT>                       : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#554#;
166    <FONT COLOR=red><A NAME="ref_161_4">Key_Message</A></FONT>                    : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#555#;
167    <FONT COLOR=red><A NAME="ref_162_4">Key_Move</A></FONT>                       : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#556#;
168    <FONT COLOR=red><A NAME="ref_163_4">Key_Next</A></FONT>                       : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#557#;
169    <FONT COLOR=red><A NAME="ref_164_4">Key_Open</A></FONT>                       : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#560#;
170    <FONT COLOR=red><A NAME="ref_165_4">Key_Options</A></FONT>                    : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#561#;
171    <FONT COLOR=red><A NAME="ref_166_4">Key_Previous</A></FONT>                   : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#562#;
172    <FONT COLOR=red><A NAME="ref_167_4">Key_Redo</A></FONT>                       : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#563#;
173    <FONT COLOR=red><A NAME="ref_168_4">Key_Reference</A></FONT>                  : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#564#;
174    <FONT COLOR=red><A NAME="ref_169_4">Key_Refresh</A></FONT>                    : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#565#;
175    <FONT COLOR=red><A NAME="ref_170_4">Key_Replace</A></FONT>                    : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#566#;
176    <FONT COLOR=red><A NAME="ref_171_4">Key_Restart</A></FONT>                    : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#567#;
177    <FONT COLOR=red><A NAME="ref_172_4">Key_Resume</A></FONT>                     : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#570#;
178    <FONT COLOR=red><A NAME="ref_173_4">Key_Save</A></FONT>                       : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#571#;
179    <FONT COLOR=red><A NAME="ref_174_4">Key_Shift_Begin</A></FONT>                : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#572#;
180    <FONT COLOR=red><A NAME="ref_175_4">Key_Shift_Cancel</A></FONT>               : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#573#;
181    <FONT COLOR=red><A NAME="ref_176_4">Key_Shift_Command</A></FONT>              : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#574#;
182    <FONT COLOR=red><A NAME="ref_177_4">Key_Shift_Copy</A></FONT>                 : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#575#;
183    <FONT COLOR=red><A NAME="ref_178_4">Key_Shift_Create</A></FONT>               : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#576#;
184    <FONT COLOR=red><A NAME="ref_179_4">Key_Shift_Delete_Char</A></FONT>          : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#577#;
185    <FONT COLOR=red><A NAME="ref_180_4">Key_Shift_Delete_Line</A></FONT>          : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#600#;
186    <FONT COLOR=red><A NAME="ref_181_4">Key_Select</A></FONT>                     : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#601#;
187    <FONT COLOR=red><A NAME="ref_182_4">Key_Shift_End</A></FONT>                  : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#602#;
188    <FONT COLOR=red><A NAME="ref_183_4">Key_Shift_Clear_End_Of_Line</A></FONT>    : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#603#;
189    <FONT COLOR=red><A NAME="ref_184_4">Key_Shift_Exit</A></FONT>                 : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#604#;
190    <FONT COLOR=red><A NAME="ref_185_4">Key_Shift_Find</A></FONT>                 : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#605#;
191    <FONT COLOR=red><A NAME="ref_186_4">Key_Shift_Help</A></FONT>                 : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#606#;
192    <FONT COLOR=red><A NAME="ref_187_4">Key_Shift_Home</A></FONT>                 : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#607#;
193    <FONT COLOR=red><A NAME="ref_188_4">Key_Shift_Insert_Char</A></FONT>          : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#610#;
194    <FONT COLOR=red><A NAME="ref_189_4">Key_Shift_Cursor_Left</A></FONT>          : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#611#;
195    <FONT COLOR=red><A NAME="ref_190_4">Key_Shift_Message</A></FONT>              : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#612#;
196    <FONT COLOR=red><A NAME="ref_191_4">Key_Shift_Move</A></FONT>                 : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#613#;
197    <FONT COLOR=red><A NAME="ref_192_4">Key_Shift_Next_Page</A></FONT>            : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#614#;
198    <FONT COLOR=red><A NAME="ref_193_4">Key_Shift_Options</A></FONT>              : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#615#;
199    <FONT COLOR=red><A NAME="ref_194_4">Key_Shift_Previous_Page</A></FONT>        : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#616#;
200    <FONT COLOR=red><A NAME="ref_195_4">Key_Shift_Print</A></FONT>                : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#617#;
201    <FONT COLOR=red><A NAME="ref_196_4">Key_Shift_Redo</A></FONT>                 : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#620#;
202    <FONT COLOR=red><A NAME="ref_197_4">Key_Shift_Replace</A></FONT>              : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#621#;
203    <FONT COLOR=red><A NAME="ref_198_4">Key_Shift_Cursor_Right</A></FONT>         : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#622#;
204    <FONT COLOR=red><A NAME="ref_199_4">Key_Shift_Resume</A></FONT>               : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#623#;
205    <FONT COLOR=red><A NAME="ref_200_4">Key_Shift_Save</A></FONT>                 : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#624#;
206    <FONT COLOR=red><A NAME="ref_201_4">Key_Shift_Suspend</A></FONT>              : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#625#;
207    <FONT COLOR=red><A NAME="ref_202_4">Key_Shift_Undo</A></FONT>                 : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#626#;
208    <FONT COLOR=red><A NAME="ref_203_4">Key_Suspend</A></FONT>                    : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#627#;
209    <FONT COLOR=red><A NAME="ref_204_4">Key_Undo</A></FONT>                       : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#630#;
210    <FONT COLOR=red><A NAME="ref_205_4">Key_Mouse</A></FONT>                      : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#631#;
211    Key_Resize                     : <b>constant</b> Special_Key_Code := 8#632#;
212
213    Key_Max                        : <b>constant</b> Special_Key_Code
214      := Special_Key_Code'Last;
215
216    <b>subtype</b> User_Key_Code <b>is</b> Key_Code
217      <b>range</b> (Key_Max + 129) .. Key_Code'Last;
218    <FONT COLOR=green><EM>--  This is reserved for user defined key codes. The range between Key_Max</EM></FONT>
219    <FONT COLOR=green><EM>--  and the first user code is reserved for subsystems like menu and forms.</EM></FONT>
220
221    <FONT COLOR=green><EM>--  For those who like to use the original key names we produce them were</EM></FONT>
222    <FONT COLOR=green><EM>--  they differ from the original. Please note that they may differ in</EM></FONT>
223    <FONT COLOR=green><EM>--  lower/upper case.</EM></FONT>
224    KEY_DOWN         : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_93_4">Key_Cursor_Down</A>;
225    KEY_UP           : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_94_4">Key_Cursor_Up</A>;
226    KEY_LEFT         : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_95_4">Key_Cursor_Left</A>;
227    KEY_RIGHT        : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_123_4">Key_Cursor_Right</A>;
228    KEY_DL           : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_124_4">Key_Delete_Line</A>;
229    KEY_IL           : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_125_4">Key_Insert_Line</A>;
230    KEY_DC           : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_126_4">Key_Delete_Char</A>;
231    KEY_IC           : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_127_4">Key_Insert_Char</A>;
232    KEY_EIC          : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_128_4">Key_Exit_Insert_Mode</A>;
233    KEY_CLEAR        : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_129_4">Key_Clear_Screen</A>;
234    KEY_EOS          : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_130_4">Key_Clear_End_Of_Screen</A>;
235    KEY_EOL          : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_131_4">Key_Clear_End_Of_Line</A>;
236    KEY_SF           : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_132_4">Key_Scroll_1_Forward</A>;
237    KEY_SR           : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_133_4">Key_Scroll_1_Backward</A>;
238    KEY_NPAGE        : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_134_4">Key_Next_Page</A>;
239    KEY_PPAGE        : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_135_4">Key_Previous_Page</A>;
240    KEY_STAB         : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_136_4">Key_Set_Tab</A>;
241    KEY_CTAB         : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_137_4">Key_Clear_Tab</A>;
242    KEY_CATAB        : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_138_4">Key_Clear_All_Tabs</A>;
243    KEY_ENTER        : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_139_4">Key_Enter_Or_Send</A>;
244    KEY_SRESET       : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_142_4">Key_Soft_Reset</A>;
245    KEY_LL           : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_143_4">Key_Bottom</A>;
246    KEY_A1           : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_144_4">Key_Upper_Left_Of_Keypad</A>;
247    KEY_A3           : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_145_4">Key_Upper_Right_Of_Keypad</A>;
248    KEY_B2           : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_146_4">Key_Center_Of_Keypad</A>;
249    KEY_C1           : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_147_4">Key_Lower_Left_Of_Keypad</A>;
250    KEY_C3           : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_148_4">Key_Lower_Right_Of_Keypad</A>;
251    KEY_BTAB         : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_149_4">Key_Back_Tab</A>;
252    KEY_BEG          : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_173_4">Key_Beginning</A>;
253    KEY_SBEG         : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_174_4">Key_Shift_Begin</A>;
254    KEY_SCANCEL      : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_175_4">Key_Shift_Cancel</A>;
255    KEY_SCOMMAND     : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_176_4">Key_Shift_Command</A>;
256    KEY_SCOPY        : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_177_4">Key_Shift_Copy</A>;
257    KEY_SCREATE      : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_178_4">Key_Shift_Create</A>;
258    KEY_SDC          : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_179_4">Key_Shift_Delete_Char</A>;
259    KEY_SDL          : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_181_4">Key_Shift_Delete_Line</A>;
260    KEY_SEND         : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_182_4">Key_Shift_End</A>;
261    KEY_SEOL         : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_183_4">Key_Shift_Clear_End_Of_Line</A>;
262    KEY_SEXIT        : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_184_4">Key_Shift_Exit</A>;
263    KEY_SFIND        : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_185_4">Key_Shift_Find</A>;
264    KEY_SHELP        : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_186_4">Key_Shift_Help</A>;
265    KEY_SHOME        : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_187_4">Key_Shift_Home</A>;
266    KEY_SIC          : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_188_4">Key_Shift_Insert_Char</A>;
267    KEY_SLEFT        : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_189_4">Key_Shift_Cursor_Left</A>;
268    KEY_SMESSAGE     : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_190_4">Key_Shift_Message</A>;
269    KEY_SMOVE        : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_191_4">Key_Shift_Move</A>;
270    KEY_SNEXT        : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_192_4">Key_Shift_Next_Page</A>;
271    KEY_SOPTIONS     : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_193_4">Key_Shift_Options</A>;
272    KEY_SPREVIOUS    : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_194_4">Key_Shift_Previous_Page</A>;
273    KEY_SPRINT       : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_195_4">Key_Shift_Print</A>;
274    KEY_SREDO        : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_196_4">Key_Shift_Redo</A>;
275    KEY_SREPLACE     : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_197_4">Key_Shift_Replace</A>;
276    KEY_SRIGHT       : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_198_4">Key_Shift_Cursor_Right</A>;
277    KEY_SRSUME       : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_199_4">Key_Shift_Resume</A>;
278    KEY_SSAVE        : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_200_4">Key_Shift_Save</A>;
279    KEY_SSUSPEND     : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> <b>renames</b> <A HREF="terminal_interface-curses__ads.htm#ref_201_4">Key_Shift_Suspend</A>;
280    KEY_SUNDO        : Special_Key_Code <b>renames</b> Key_Shift_Undo;
281
282 <FONT COLOR=green><EM>------------------------------------------------------------------------------</EM></FONT>
283
284    <b>type</b><A HREF="terminal_interface-curses__ads.htm#ref_278_9"> </A>Color_Number <b>is</b> <b>range</b><A HREF="interfac__ads.htm#ref_38_9"> </A>-1 .. Integer (Interfaces.C.short'Last);
285    <b>for</b> Color_Number'Size <b>use</b> Interfaces.C.short'Size;
286    <FONT COLOR=green><EM>--  (n)curses uses a short for the color index</EM></FONT>
287    <FONT COLOR=green><EM>--  The model is, that a Color_Number is an index into an array of</EM></FONT>
288    <FONT COLOR=green><EM>--  (potentially) definable colors. Some of those indices are</EM></FONT>
289    <FONT COLOR=green><EM>--  predefined (see below), although they may not really exist.</EM></FONT>
290
291    <FONT COLOR=red><A NAME="ref_286_4">Default_Color</A></FONT>    : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := -1;
292    <FONT COLOR=red><A NAME="ref_287_4">Black</A></FONT>            : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := 0;
293    <FONT COLOR=red><A NAME="ref_288_4">Red</A></FONT>              : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := 1;
294    <FONT COLOR=red><A NAME="ref_289_4">Green</A></FONT>            : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := 2;
295    <FONT COLOR=red><A NAME="ref_290_4">Yellow</A></FONT>           : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := 3;
296    <FONT COLOR=red><A NAME="ref_291_4">Blue</A></FONT>             : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := 4;
297    <FONT COLOR=red><A NAME="ref_292_4">Magenta</A></FONT>          : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := 5;
298    <FONT COLOR=red><A NAME="ref_293_4">Cyan</A></FONT>             : <b>constant</b> <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := 6;
299    White            : <b>constant</b> Color_Number := 7;
300
301    <b>type</b><A HREF="terminal_interface-curses__ads.htm#ref_295_9"> </A>RGB_Value <b>is</b> <b>range</b><A HREF="interfac__ads.htm#ref_38_9"> </A>0 .. Integer (Interfaces.C.short'Last);
302    <b>for</b> RGB_Value'Size <b>use</b> Interfaces.C.short'Size;
303    <FONT COLOR=green><EM>--  Some system may allow to redefine a color by setting RGB values.</EM></FONT>
304
305    <b>type</b><A HREF="terminal_interface-curses__ads.htm#ref_299_9"> </A>Color_Pair <b>is</b> <b>range</b> 0 .. 255;
306    <b>for</b> Color_Pair'Size <b>use</b> 8;
307    <b>subtype</b> Redefinable_Color_Pair <b>is</b> Color_Pair <b>range</b> 1 .. 255;
308    <FONT COLOR=green><EM>--  (n)curses reserves 1 Byte for the color-pair number. Color Pair 0</EM></FONT>
309    <FONT COLOR=green><EM>--  is fixed (Black &amp; White). A color pair is simply a combination of</EM></FONT>
310    <FONT COLOR=green><EM>--  two colors described by Color_Numbers, one for the foreground and</EM></FONT>
311    <FONT COLOR=green><EM>--  the other for the background</EM></FONT>
312
313    <b>type</b> Character_Attribute_Set <b>is</b>
314       <b>record</b>
315          <FONT COLOR=red><A NAME="ref_310_10">Stand_Out</A></FONT>               : Boolean;
316          <FONT COLOR=red><A NAME="ref_311_10">Under_Line</A></FONT>              : Boolean;
317          <FONT COLOR=red><A NAME="ref_312_10">Reverse_Video</A></FONT>           : Boolean;
318          <FONT COLOR=red><A NAME="ref_313_10">Blink</A></FONT>                   : Boolean;
319          <FONT COLOR=red><A NAME="ref_314_10">Dim_Character</A></FONT>           : Boolean;
320          <FONT COLOR=red><A NAME="ref_315_10">Bold_Character</A></FONT>          : Boolean;
321          <FONT COLOR=red><A NAME="ref_316_10">Alternate_Character_Set</A></FONT> : Boolean;
322          <FONT COLOR=red><A NAME="ref_317_10">Invisible_Character</A></FONT>     : Boolean;
323          <FONT COLOR=red><A NAME="ref_318_10">Protected_Character</A></FONT>     : Boolean;
324          <FONT COLOR=red><A NAME="ref_319_10">Horizontal</A></FONT>              : Boolean;
325          <FONT COLOR=red><A NAME="ref_320_10">Left</A></FONT>                    : Boolean;
326          <FONT COLOR=red><A NAME="ref_321_10">Low</A></FONT>                     : Boolean;
327          <FONT COLOR=red><A NAME="ref_322_10">Right</A></FONT>                   : Boolean;
328          <FONT COLOR=red><A NAME="ref_323_10">Top</A></FONT>                     : Boolean;
329          Vertical                : Boolean;
330       <b>end</b> <b>record</b>;
331    <b>pragma</b> Convention (C, Character_Attribute_Set);
332
333    <b>for</b> Character_Attribute_Set <b>use</b>
334       <b>record</b>
335          Stand_Out               <b>at</b> 0 <b>range</b>  0 ..  0;
336          Under_Line              <b>at</b> 0 <b>range</b>  1 ..  1;
337          Reverse_Video           <b>at</b> 0 <b>range</b>  2 ..  2;
338          Blink                   <b>at</b> 0 <b>range</b>  3 ..  3;
339          Dim_Character           <b>at</b> 0 <b>range</b>  4 ..  4;
340          Bold_Character          <b>at</b> 0 <b>range</b>  5 ..  5;
341          Alternate_Character_Set <b>at</b> 0 <b>range</b>  6 ..  6;
342          Invisible_Character     <b>at</b> 0 <b>range</b>  7 ..  7;
343          Protected_Character     <b>at</b> 0 <b>range</b>  8 ..  8;
344          Horizontal              <b>at</b> 0 <b>range</b>  9 ..  9;
345          Left                    <b>at</b> 0 <b>range</b> 10 .. 10;
346          Low                     <b>at</b> 0 <b>range</b> 11 .. 11;
347          Right                   <b>at</b> 0 <b>range</b> 12 .. 12;
348          Top                     <b>at</b> 0 <b>range</b> 13 .. 13;
349          Vertical                <b>at</b> 0 <b>range</b> 14 .. 14;
350       <b>end</b> <b>record</b>;
351    <b>for</b> Character_Attribute_Set'Size <b>use</b> 16;
352    <FONT COLOR=green><EM>--  Please note: this rep. clause is generated and may be</EM></FONT>
353    <FONT COLOR=green><EM>--               different on your system.</EM></FONT>
354    <FONT COLOR=green><EM>--  (n)curses uses all but the lowest 16 Bits for Attributes.</EM></FONT>
355
356    Normal_Video : <b>constant</b> Character_Attribute_Set := (<b>others</b> =&gt; False);
357
358    <b>type</b> Attributed_Character <b>is</b>
359       <b>record</b>
360          <FONT COLOR=red><A NAME="ref_355_10">Attr</A></FONT>  : <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Character_Attribute_Set</A>;
361          <FONT COLOR=red><A NAME="ref_356_10">Color</A></FONT> : Color_Pair;
362          Ch    : Character;
363       <b>end</b> <b>record</b>;
364    <b>pragma</b> Convention (C, Attributed_Character);
365    <FONT COLOR=green><EM>--  This is the counterpart for the chtype in C.</EM></FONT>
366
367    <b>for</b> Attributed_Character <b>use</b>
368       <b>record</b>
369          Ch    <b>at</b> 0 <b>range</b>  0 ..  7;
370          Color <b>at</b> 0 <b>range</b>  8 .. 15;
371          Attr  <b>at</b> 0 <b>range</b> 16 .. 31;
372       <b>end</b> <b>record</b>;
373    <b>for</b> Attributed_Character'Size <b>use</b> 32;
374       <FONT COLOR=green><EM>--  Please note: this rep. clause is generated and may be</EM></FONT>
375       <FONT COLOR=green><EM>--               different on your system.</EM></FONT>
376
377    Default_Character : <b>constant</b> Attributed_Character
378      := (<A HREF="terminal_interface-curses__ads.htm#ref_355_10">Ch</A>    =&gt; <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Character</A>'First,
379          <A HREF="terminal_interface-curses__ads.htm#ref_354_10">Color</A> =&gt; Color_Pair'First,
380          Attr  =&gt; (<b>others</b> =&gt; False));  <FONT COLOR=green><EM>--  preelaboratable Normal_Video</EM></FONT>
381
382    <b>type</b> Attributed_String <b>is</b> <b>array</b> (Positive <b>range</b> &lt;&gt;) <b>of</b> Attributed_Character;
383    <b>pragma</b> Pack (Attributed_String);
384    <FONT COLOR=green><EM>--  In this binding we allow strings of attributed characters.</EM></FONT>
385
386    <FONT COLOR=green><EM>------------------</EM></FONT>
387    <FONT COLOR=green><EM>--  Exceptions  --</EM></FONT>
388    <FONT COLOR=green><EM>------------------</EM></FONT>
389    <FONT COLOR=red><A NAME="ref_384_4">Curses_Exception</A></FONT>     : <b>exception</b>;
390    Wrong_Curses_Version : <b>exception</b>;
391
392    <FONT COLOR=green><EM>--  Those exceptions are raised by the ETI (Extended Terminal Interface)</EM></FONT>
393    <FONT COLOR=green><EM>--  subpackets for Menu and Forms handling.</EM></FONT>
394    <FONT COLOR=green><EM>--</EM></FONT>
395    <FONT COLOR=red><A NAME="ref_390_4">Eti_System_Error</A></FONT>    : <b>exception</b>;
396    <FONT COLOR=red><A NAME="ref_391_4">Eti_Bad_Argument</A></FONT>    : <b>exception</b>;
397    <FONT COLOR=red><A NAME="ref_392_4">Eti_Posted</A></FONT>          : <b>exception</b>;
398    <FONT COLOR=red><A NAME="ref_393_4">Eti_Connected</A></FONT>       : <b>exception</b>;
399    <FONT COLOR=red><A NAME="ref_394_4">Eti_Bad_State</A></FONT>       : <b>exception</b>;
400    <FONT COLOR=red><A NAME="ref_395_4">Eti_No_Room</A></FONT>         : <b>exception</b>;
401    <FONT COLOR=red><A NAME="ref_396_4">Eti_Not_Posted</A></FONT>      : <b>exception</b>;
402    <FONT COLOR=red><A NAME="ref_397_4">Eti_Unknown_Command</A></FONT> : <b>exception</b>;
403    <FONT COLOR=red><A NAME="ref_398_4">Eti_No_Match</A></FONT>        : <b>exception</b>;
404    <FONT COLOR=red><A NAME="ref_399_4">Eti_Not_Selectable</A></FONT>  : <b>exception</b>;
405    <FONT COLOR=red><A NAME="ref_400_4">Eti_Not_Connected</A></FONT>   : <b>exception</b>;
406    <FONT COLOR=red><A NAME="ref_401_4">Eti_Request_Denied</A></FONT>  : <b>exception</b>;
407    <FONT COLOR=red><A NAME="ref_402_4">Eti_Invalid_Field</A></FONT>   : <b>exception</b>;
408    Eti_Current         : <b>exception</b>;
409
410    <FONT COLOR=green><EM>--------------------------------------------------------------------------</EM></FONT>
411    <FONT COLOR=green><EM>--  External C variables</EM></FONT>
412    <FONT COLOR=green><EM>--  Conceptually even in C this are kind of constants, but they are</EM></FONT>
413    <FONT COLOR=green><EM>--  initialized and sometimes changed by the library routines at runtime</EM></FONT>
414    <FONT COLOR=green><EM>--  depending on the type of terminal. I believe the best way to model</EM></FONT>
415    <FONT COLOR=green><EM>--  this is to use functions.</EM></FONT>
416    <FONT COLOR=green><EM>--------------------------------------------------------------------------</EM></FONT>
417
418    <b>function</b> Lines <A HREF="terminal_interface-curses__ads.htm#ref_412_13"> </A>          <b>return</b> Line_Count;
419    <b>pragma</b> Inline (Lines);
420
421    <b>function</b> Columns          <b>return</b> Column_Count;
422    <b>pragma</b> Inline (Columns);
423
424    <b>function</b> Tab_Size         <b>return</b> Natural;
425    <b>pragma</b> Inline (Tab_Size);
426
427    <b>function</b> Number_Of_Colors <b>return</b> Natural;
428    <b>pragma</b> Inline (Number_Of_Colors);
429
430    <b>function</b> Number_Of_Color_Pairs <b>return</b> Natural;
431    <b>pragma</b> Inline (Number_Of_Color_Pairs);
432
433    <b>type</b> C_ACS_Map <b>is</b> <b>array</b> (Character'Val (0) .. Character'Val (127))
434    <FONT COLOR=red><A NAME="ref_429_4"> </A></FONT>    <b>of</b> Attributed_Character;
435    ACS_Map : C_ACS_Map;
436    <b>pragma</b> Import (C, ACS_Map, "acs_map");
437    <FONT COLOR=green><EM>--</EM></FONT>
438    <FONT COLOR=green><EM>--</EM></FONT>
439    <FONT COLOR=green><EM>--  Constants for several characters from the Alternate Character Set</EM></FONT>
440    <FONT COLOR=green><EM>--  You must use these constants as indices into the ACS_Map array</EM></FONT>
441    <FONT COLOR=green><EM>--  to get the corresponding attributed character at runtime.</EM></FONT>
442    <FONT COLOR=green><EM>--</EM></FONT>
443    <FONT COLOR=red><A NAME="ref_438_4">ACS_Upper_Left_Corner</A></FONT>    : <b>constant</b> Character := 'l';
444    <FONT COLOR=red><A NAME="ref_439_4">ACS_Lower_Left_Corner</A></FONT>    : <b>constant</b> Character := 'm';
445    <FONT COLOR=red><A NAME="ref_440_4">ACS_Upper_Right_Corner</A></FONT>   : <b>constant</b> Character := 'k';
446    <FONT COLOR=red><A NAME="ref_441_4">ACS_Lower_Right_Corner</A></FONT>   : <b>constant</b> Character := 'j';
447    <FONT COLOR=red><A NAME="ref_442_4">ACS_Left_Tee</A></FONT>             : <b>constant</b> Character := 't';
448    <FONT COLOR=red><A NAME="ref_443_4">ACS_Right_Tee</A></FONT>            : <b>constant</b> Character := 'u';
449    <FONT COLOR=red><A NAME="ref_444_4">ACS_Bottom_Tee</A></FONT>           : <b>constant</b> Character := 'v';
450    <FONT COLOR=red><A NAME="ref_445_4">ACS_Top_Tee</A></FONT>              : <b>constant</b> Character := 'w';
451    <FONT COLOR=red><A NAME="ref_446_4">ACS_Horizontal_Line</A></FONT>      : <b>constant</b> Character := 'q';
452    <FONT COLOR=red><A NAME="ref_447_4">ACS_Vertical_Line</A></FONT>        : <b>constant</b> Character := 'x';
453    <FONT COLOR=red><A NAME="ref_448_4">ACS_Plus_Symbol</A></FONT>          : <b>constant</b> Character := 'n';
454    <FONT COLOR=red><A NAME="ref_449_4">ACS_Scan_Line_1</A></FONT>          : <b>constant</b> Character := 'o';
455    <FONT COLOR=red><A NAME="ref_450_4">ACS_Scan_Line_9</A></FONT>          : <b>constant</b> Character := 's';
456    <FONT COLOR=red><A NAME="ref_451_4">ACS_Diamond</A></FONT>              : <b>constant</b> Character := Character'Val (96);
457    <FONT COLOR=red><A NAME="ref_452_4">ACS_Checker_Board</A></FONT>        : <b>constant</b> Character := 'a';
458    <FONT COLOR=red><A NAME="ref_453_4">ACS_Degree</A></FONT>               : <b>constant</b> Character := 'f';
459    <FONT COLOR=red><A NAME="ref_454_4">ACS_Plus_Minus</A></FONT>           : <b>constant</b> Character := 'g';
460    <FONT COLOR=red><A NAME="ref_455_4">ACS_Bullet</A></FONT>               : <b>constant</b> Character := '~';
461    <FONT COLOR=red><A NAME="ref_456_4">ACS_Left_Arrow</A></FONT>           : <b>constant</b> Character := ',';
462    <FONT COLOR=red><A NAME="ref_457_4">ACS_Right_Arrow</A></FONT>          : <b>constant</b> Character := '+';
463    <FONT COLOR=red><A NAME="ref_458_4">ACS_Down_Arrow</A></FONT>           : <b>constant</b> Character := '.';
464    <FONT COLOR=red><A NAME="ref_459_4">ACS_Up_Arrow</A></FONT>             : <b>constant</b> Character := '-';
465    <FONT COLOR=red><A NAME="ref_460_4">ACS_Board_Of_Squares</A></FONT>     : <b>constant</b> Character := 'h';
466    <FONT COLOR=red><A NAME="ref_461_4">ACS_Lantern</A></FONT>              : <b>constant</b> Character := 'i';
467    <FONT COLOR=red><A NAME="ref_462_4">ACS_Solid_Block</A></FONT>          : <b>constant</b> Character := '0';
468    <FONT COLOR=red><A NAME="ref_463_4">ACS_Scan_Line_3</A></FONT>          : <b>constant</b> Character := 'p';
469    <FONT COLOR=red><A NAME="ref_464_4">ACS_Scan_Line_7</A></FONT>          : <b>constant</b> Character := 'r';
470    <FONT COLOR=red><A NAME="ref_465_4">ACS_Less_Or_Equal</A></FONT>        : <b>constant</b> Character := 'y';
471    <FONT COLOR=red><A NAME="ref_466_4">ACS_Greater_Or_Equal</A></FONT>     : <b>constant</b> Character := 'z';
472    <FONT COLOR=red><A NAME="ref_467_4">ACS_PI</A></FONT>                   : <b>constant</b> Character := '{';
473    <FONT COLOR=red><A NAME="ref_468_4">ACS_Not_Equal</A></FONT>            : <b>constant</b> Character := '|';
474    ACS_Sterling             : <b>constant</b> Character := '}';
475
476    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
477    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_initscr.3x.html">curs_initscr.3x</A></EM></FONT>
478    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
479    <FONT COLOR=green><EM>--  | Not implemented: newterm, set_term, delscreen</EM></FONT>
480
481    <FONT COLOR=green><EM>--  #1A NAME="AFU_1"#2|</EM></FONT>
482    <b>function</b> Standard_Window <b>return</b> Window;
483    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_initscr.3x.html">stdscr</A></EM></FONT>
484    <b>pragma</b> Inline (Standard_Window);
485
486    <FONT COLOR=green><EM>--  #1A NAME="AFU_2"#2|</EM></FONT>
487    <b>function</b> Current_Window <b>return</b> Window;
488    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_initscr.3x.html">curscr</A></EM></FONT>
489    <b>pragma</b> Inline (Current_Window);
490
491    <FONT COLOR=green><EM>--  #1A NAME="AFU_3"#2|</EM></FONT>
492    <b>procedure</b> Init_Screen;
493
494    <FONT COLOR=green><EM>--  #1A NAME="AFU_4"#2|</EM></FONT>
495    <b>procedure</b> Init_Windows <b>renames</b> Init_Screen;
496    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_initscr.3x.html">initscr()</A></EM></FONT>
497    <b>pragma</b> Inline (Init_Screen);
498    <FONT COLOR=green><EM>--  pragma Inline (Init_Windows);</EM></FONT>
499
500    <FONT COLOR=green><EM>--  #1A NAME="AFU_5"#2|</EM></FONT>
501    <b>procedure</b> End_Windows;
502    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_initscr.3x.html">endwin()</A></EM></FONT>
503    <b>procedure</b> End_Screen <b>renames</b> End_Windows;
504    <b>pragma</b> Inline (End_Windows);
505    <FONT COLOR=green><EM>--  pragma Inline (End_Screen);</EM></FONT>
506
507    <FONT COLOR=green><EM>--  #1A NAME="AFU_6"#2|</EM></FONT>
508    <b>function</b> Is_End_Window <b>return</b> Boolean;
509    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_initscr.3x.html">isendwin()</A></EM></FONT>
510    <b>pragma</b> Inline (Is_End_Window);
511
512    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
513    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_move.3x.html">curs_move.3x</A></EM></FONT>
514    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
515
516    <FONT COLOR=green><EM>--  #1A NAME="AFU_7"#2|</EM></FONT>
517    <b>procedure</b> Move_Cursor (<FONT COLOR=red><A NAME="ref_512_27" HREF="terminal_interface-curses__adb.htm#ref_134_27">Win</A></FONT>    : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;
518                           <FONT COLOR=red><A NAME="ref_513_27" HREF="terminal_interface-curses__adb.htm#ref_135_27">Line</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
519                           Column : <b>in</b> Column_Position);
520    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_move.3x.html">wmove()</A></EM></FONT>
521    <FONT COLOR=green><EM>--  AKA: move()</EM></FONT>
522    <b>pragma</b> Inline (Move_Cursor);
523
524    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
525    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_addch.3x.html">curs_addch.3x</A></EM></FONT>
526    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
527
528    <FONT COLOR=green><EM>--  #1A NAME="AFU_8"#2|</EM></FONT>
529    <b>procedure</b> Add (<FONT COLOR=red><A NAME="ref_524_19" HREF="terminal_interface-curses__adb.htm#ref_149_19">Win</A></FONT> :  <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Window</A> := Standard_Window;
530                   Ch  :  <b>in</b> Attributed_Character);
531    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_addch.3x.html">waddch()</A></EM></FONT>
532    <FONT COLOR=green><EM>--  AKA: addch()</EM></FONT>
533
534    <b>procedure</b> Add (<FONT COLOR=red><A NAME="ref_529_19" HREF="terminal_interface-curses__adb.htm#ref_161_19">Win</A></FONT> :  <b>in</b> Window := Standard_Window;
535                   Ch  :  <b>in</b> Character);
536    <FONT COLOR=green><EM>--  Add a single character at the current logical cursor position to</EM></FONT>
537    <FONT COLOR=green><EM>--  the window. Use the current windows attributes.</EM></FONT>
538
539    <FONT COLOR=green><EM>--  #1A NAME="AFU_9"#2|</EM></FONT>
540    <b>procedure</b> Add
541      (<FONT COLOR=red><A NAME="ref_536_7" HREF="terminal_interface-curses__adb.htm#ref_172_7">Win</A></FONT>    : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;
542       <FONT COLOR=red><A NAME="ref_537_7" HREF="terminal_interface-curses__adb.htm#ref_173_7">Line</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
543       <FONT COLOR=red><A NAME="ref_538_7" HREF="terminal_interface-curses__adb.htm#ref_174_7">Column</A></FONT> : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Column_Position</A>;
544       Ch     : <b>in</b> Attributed_Character);
545    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_addch.3x.html">mvwaddch()</A></EM></FONT>
546    <FONT COLOR=green><EM>--  AKA: mvaddch()</EM></FONT>
547
548    <b>procedure</b> Add
549      (<FONT COLOR=red><A NAME="ref_544_7" HREF="terminal_interface-curses__adb.htm#ref_191_7">Win</A></FONT>    : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;
550       <FONT COLOR=red><A NAME="ref_545_7" HREF="terminal_interface-curses__adb.htm#ref_192_7">Line</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
551       <FONT COLOR=red><A NAME="ref_546_7" HREF="terminal_interface-curses__adb.htm#ref_193_7">Column</A></FONT> : <b>in</b> Column_Position;
552       Ch     : <b>in</b> Character);
553    <FONT COLOR=green><EM>--  Move to the position and add a single character into the window</EM></FONT>
554    <FONT COLOR=green><EM>--  There are more Add routines, so the Inline pragma follows later</EM></FONT>
555
556    <FONT COLOR=green><EM>--  #1A NAME="AFU_10"#2|</EM></FONT>
557    <b>procedure</b> Add_With_Immediate_Echo
558      (<FONT COLOR=red><A NAME="ref_553_7" HREF="terminal_interface-curses__adb.htm#ref_206_7">Win</A></FONT> : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Window</A> := Standard_Window;
559       Ch  : <b>in</b> Attributed_Character);
560    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_addch.3x.html">wechochar()</A></EM></FONT>
561    <FONT COLOR=green><EM>--  AKA: echochar()</EM></FONT>
562
563    <b>procedure</b> Add_With_Immediate_Echo
564      (<FONT COLOR=red><A NAME="ref_559_7" HREF="terminal_interface-curses__adb.htm#ref_219_7">Win</A></FONT> : <b>in</b> Window := Standard_Window;
565       Ch  : <b>in</b> Character);
566    <FONT COLOR=green><EM>--  Add a character and do an immediate refresh of the screen.</EM></FONT>
567    <b>pragma</b> Inline (Add_With_Immediate_Echo);
568
569    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
570    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_window.3x.html">curs_window.3x</A></EM></FONT>
571    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
572    <FONT COLOR=green><EM>--  Not Implemented: wcursyncup</EM></FONT>
573
574    <FONT COLOR=green><EM>--  #1A NAME="AFU_11"#2|</EM></FONT>
575    <b>function</b> Create
576      (<FONT COLOR=red><A NAME="ref_571_7" HREF="terminal_interface-curses__adb.htm#ref_230_21">Number_Of_Lines</A></FONT>       : <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Line_Count</A>;
577       <FONT COLOR=red><A NAME="ref_572_7" HREF="terminal_interface-curses__adb.htm#ref_231_21">Number_Of_Columns</A></FONT>     : <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Column_Count</A>;
578       <FONT COLOR=red><A NAME="ref_573_7" HREF="terminal_interface-curses__adb.htm#ref_232_21">First_Line_Position</A></FONT>   : <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
579       First_Column_Position : Column_Position) <b>return</b> Window;
580    <FONT COLOR=green><EM>--  Not Implemented: Default Number_Of_Lines, Number_Of_Columns</EM></FONT>
581    <FONT COLOR=green><EM>--  the C version lets them be 0, see the man page.</EM></FONT>
582    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_window.3x.html">newwin()</A></EM></FONT>
583    <b>pragma</b> Inline (Create);
584
585    <b>function</b> New_Window
586      (<FONT COLOR=red><A NAME="ref_581_7">Number_Of_Lines</A></FONT>       : <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Line_Count</A>;
587       <FONT COLOR=red><A NAME="ref_582_7">Number_Of_Columns</A></FONT>     : <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Column_Count</A>;
588       <FONT COLOR=red><A NAME="ref_583_7">First_Line_Position</A></FONT>   : <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
589       First_Column_Position : Column_Position) <b>return</b> Window
590      <b>renames</b> Create;
591    <FONT COLOR=green><EM>--  pragma Inline (New_Window);</EM></FONT>
592
593    <FONT COLOR=green><EM>--  #1A NAME="AFU_12"#2|</EM></FONT>
594    <b>procedure</b> Delete (Win : <b>in</b> <b>out</b> Window);
595    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_window.3x.html">delwin()</A></EM></FONT>
596    <FONT COLOR=green><EM>--  Reset Win to Null_Window</EM></FONT>
597    <b>pragma</b> Inline (Delete);
598
599    <FONT COLOR=green><EM>--  #1A NAME="AFU_13"#2|</EM></FONT>
600    <b>function</b> Sub_Window
601      (<FONT COLOR=red><A NAME="ref_596_7" HREF="terminal_interface-curses__adb.htm#ref_265_7">Win</A></FONT>                   : <A HREF="terminal_interface-curses__ads.htm#ref_63_12">Window</A> := Standard_Window;
602       <FONT COLOR=red><A NAME="ref_597_7" HREF="terminal_interface-curses__adb.htm#ref_266_7">Number_Of_Lines</A></FONT>       : <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Line_Count</A>;
603       <FONT COLOR=red><A NAME="ref_598_7" HREF="terminal_interface-curses__adb.htm#ref_267_7">Number_Of_Columns</A></FONT>     : <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Column_Count</A>;
604       <FONT COLOR=red><A NAME="ref_599_7" HREF="terminal_interface-curses__adb.htm#ref_268_7">First_Line_Position</A></FONT>   : <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
605       First_Column_Position : Column_Position) <b>return</b> Window;
606    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_window.3x.html">subwin()</A></EM></FONT>
607    <b>pragma</b> Inline (Sub_Window);
608
609    <FONT COLOR=green><EM>--  #1A NAME="AFU_14"#2|</EM></FONT>
610    <b>function</b> Derived_Window
611      (<FONT COLOR=red><A NAME="ref_606_7" HREF="terminal_interface-curses__adb.htm#ref_293_7">Win</A></FONT>                   : <A HREF="terminal_interface-curses__ads.htm#ref_63_12">Window</A> := Standard_Window;
612       <FONT COLOR=red><A NAME="ref_607_7" HREF="terminal_interface-curses__adb.htm#ref_294_7">Number_Of_Lines</A></FONT>       : <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Line_Count</A>;
613       <FONT COLOR=red><A NAME="ref_608_7" HREF="terminal_interface-curses__adb.htm#ref_295_7">Number_Of_Columns</A></FONT>     : <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Column_Count</A>;
614       <FONT COLOR=red><A NAME="ref_609_7" HREF="terminal_interface-curses__adb.htm#ref_296_7">First_Line_Position</A></FONT>   : <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
615       First_Column_Position : Column_Position) <b>return</b> Window;
616    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_window.3x.html">derwin()</A></EM></FONT>
617    <b>pragma</b> Inline (Derived_Window);
618
619    <FONT COLOR=green><EM>--  #1A NAME="AFU_15"#2|</EM></FONT>
620    <b>function</b> Duplicate (Win : Window) <b>return</b> Window;
621    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_window.3x.html">dupwin()</A></EM></FONT>
622    <b>pragma</b> Inline (Duplicate);
623
624    <FONT COLOR=green><EM>--  #1A NAME="AFU_16"#2|</EM></FONT>
625    <b>procedure</b> Move_Window (<FONT COLOR=red><A NAME="ref_620_27" HREF="terminal_interface-curses__adb.htm#ref_333_27">Win</A></FONT>    : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A>;
626                           <FONT COLOR=red><A NAME="ref_621_27" HREF="terminal_interface-curses__adb.htm#ref_334_27">Line</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
627                           Column : <b>in</b> Column_Position);
628    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_window.3x.html">mvwin()</A></EM></FONT>
629    <b>pragma</b> Inline (Move_Window);
630
631    <FONT COLOR=green><EM>--  #1A NAME="AFU_17"#2|</EM></FONT>
632    <b>procedure</b> Move_Derived_Window (<FONT COLOR=red><A NAME="ref_627_35" HREF="terminal_interface-curses__adb.htm#ref_347_35">Win</A></FONT>    : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A>;
633                                   <FONT COLOR=red><A NAME="ref_628_35" HREF="terminal_interface-curses__adb.htm#ref_348_35">Line</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
634                                   Column : <b>in</b> Column_Position);
635    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_window.3x.html">mvderwin()</A></EM></FONT>
636    <b>pragma</b> Inline (Move_Derived_Window);
637
638    <FONT COLOR=green><EM>--  #1A NAME="AFU_18"#2|</EM></FONT>
639    <b>procedure</b> Synchronize_Upwards (Win : <b>in</b> Window);
640    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_window.3x.html">wsyncup()</A></EM></FONT>
641    <b>pragma</b> Import (C, Synchronize_Upwards, "wsyncup");
642
643    <FONT COLOR=green><EM>--  #1A NAME="AFU_19"#2|</EM></FONT>
644    <b>procedure</b> Synchronize_Downwards (Win : <b>in</b> Window);
645    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_window.3x.html">wsyncdown()</A></EM></FONT>
646    <b>pragma</b> Import (C, Synchronize_Downwards, "wsyncdown");
647
648    <FONT COLOR=green><EM>--  #1A NAME="AFU_20"#2|</EM></FONT>
649    <b>procedure</b> Set_Synch_Mode (<FONT COLOR=red><A NAME="ref_644_30" HREF="terminal_interface-curses__adb.htm#ref_361_30">Win</A></FONT>  : <b>in</b> Window := Standard_Window;
650                              Mode : <b>in</b> Boolean := False);
651    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_window.3x.html">syncok()</A></EM></FONT>
652    <b>pragma</b> Inline (Set_Synch_Mode);
653
654    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
655    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_addstr.3x.html">curs_addstr.3x</A></EM></FONT>
656    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
657
658    <FONT COLOR=green><EM>--  #1A NAME="AFU_21"#2|</EM></FONT>
659    <b>procedure</b> Add (<FONT COLOR=red><A NAME="ref_654_19" HREF="terminal_interface-curses__adb.htm#ref_373_19">Win</A></FONT> : <b>in</b> Window := Standard_Window;
660                   <FONT COLOR=red><A NAME="ref_655_19" HREF="terminal_interface-curses__adb.htm#ref_374_19">Str</A></FONT> : <b>in</b> String;
661                   Len : <b>in</b> Integer := -1);
662    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_addstr.3x.html">waddnstr()</A></EM></FONT>
663    <FONT COLOR=green><EM>--  AKA: waddstr()</EM></FONT>
664    <FONT COLOR=green><EM>--  AKA: addnstr()</EM></FONT>
665    <FONT COLOR=green><EM>--  AKA: addstr()</EM></FONT>
666
667    <FONT COLOR=green><EM>--  #1A NAME="AFU_22"#2|</EM></FONT>
668    <b>procedure</b> Add (<FONT COLOR=red><A NAME="ref_663_19" HREF="terminal_interface-curses__adb.htm#ref_392_7">Win</A></FONT>    : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;
669                   <FONT COLOR=red><A NAME="ref_664_19" HREF="terminal_interface-curses__adb.htm#ref_393_7">Line</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
670                   <FONT COLOR=red><A NAME="ref_665_19" HREF="terminal_interface-curses__adb.htm#ref_394_7">Column</A></FONT> : <b>in</b> Column_Position;
671                   <FONT COLOR=red><A NAME="ref_666_19" HREF="terminal_interface-curses__adb.htm#ref_395_7">Str</A></FONT>    : <b>in</b> String;
672                   Len    : <b>in</b> Integer := -1);
673    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_addstr.3x.html">mvwaddnstr()</A></EM></FONT>
674    <FONT COLOR=green><EM>--  AKA: mvwaddstr()</EM></FONT>
675    <FONT COLOR=green><EM>--  AKA: mvaddnstr()</EM></FONT>
676    <FONT COLOR=green><EM>--  AKA: mvaddstr()</EM></FONT>
677
678    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
679    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_addchstr.3x.html">curs_addchstr.3x</A></EM></FONT>
680    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
681
682    <FONT COLOR=green><EM>--  #1A NAME="AFU_23"#2|</EM></FONT>
683    <b>procedure</b> Add (<FONT COLOR=red><A NAME="ref_678_19" HREF="terminal_interface-curses__adb.htm#ref_404_7">Win</A></FONT> : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_376_9">Window</A> := Standard_Window;
684                   <FONT COLOR=red><A NAME="ref_679_19" HREF="terminal_interface-curses__adb.htm#ref_405_7">Str</A></FONT> : <b>in</b> Attributed_String;
685                   Len : <b>in</b> Integer := -1);
686    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_addchstr.3x.html">waddchnstr()</A></EM></FONT>
687    <FONT COLOR=green><EM>--  AKA: waddchstr()</EM></FONT>
688    <FONT COLOR=green><EM>--  AKA: addchnstr()</EM></FONT>
689    <FONT COLOR=green><EM>--  AKA: addchstr()</EM></FONT>
690
691    <FONT COLOR=green><EM>--  #1A NAME="AFU_24"#2|</EM></FONT>
692    <b>procedure</b> Add (<FONT COLOR=red><A NAME="ref_687_19" HREF="terminal_interface-curses__adb.htm#ref_427_7">Win</A></FONT>    : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;
693                   <FONT COLOR=red><A NAME="ref_688_19" HREF="terminal_interface-curses__adb.htm#ref_428_7">Line</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
694                   <FONT COLOR=red><A NAME="ref_689_19" HREF="terminal_interface-curses__adb.htm#ref_429_7">Column</A></FONT> : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_376_9">Column_Position</A>;
695                   <FONT COLOR=red><A NAME="ref_690_19" HREF="terminal_interface-curses__adb.htm#ref_430_7">Str</A></FONT>    : <b>in</b> Attributed_String;
696                   Len    : <b>in</b> Integer := -1);
697    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_addchstr.3x.html">mvwaddchnstr()</A></EM></FONT>
698    <FONT COLOR=green><EM>--  AKA: mvwaddchstr()</EM></FONT>
699    <FONT COLOR=green><EM>--  AKA: mvaddchnstr()</EM></FONT>
700    <FONT COLOR=green><EM>--  AKA: mvaddchstr()</EM></FONT>
701    <b>pragma</b> Inline (Add);
702
703    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
704    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_border.3x.html">curs_border.3x</A></EM></FONT>
705    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
706    <FONT COLOR=green><EM>--  | Not implemented: mvhline,  mvwhline, mvvline, mvwvline</EM></FONT>
707    <FONT COLOR=green><EM>--  | use Move_Cursor then Horizontal_Line or Vertical_Line</EM></FONT>
708
709    <FONT COLOR=green><EM>--  #1A NAME="AFU_25"#2|</EM></FONT>
710    <b>procedure</b> Border
711      (<FONT COLOR=red><A NAME="ref_706_7" HREF="terminal_interface-curses__adb.htm#ref_439_7">Win</A></FONT>                       : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Window</A> := Standard_Window;
712       <FONT COLOR=red><A NAME="ref_707_7" HREF="terminal_interface-curses__adb.htm#ref_440_7">Left_Side_Symbol</A></FONT>          : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>;
713       <FONT COLOR=red><A NAME="ref_708_7" HREF="terminal_interface-curses__adb.htm#ref_441_7">Right_Side_Symbol</A></FONT>         : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>;
714       <FONT COLOR=red><A NAME="ref_709_7" HREF="terminal_interface-curses__adb.htm#ref_442_7">Top_Side_Symbol</A></FONT>           : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>;
715       <FONT COLOR=red><A NAME="ref_710_7" HREF="terminal_interface-curses__adb.htm#ref_443_7">Bottom_Side_Symbol</A></FONT>        : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>;
716       <FONT COLOR=red><A NAME="ref_711_7" HREF="terminal_interface-curses__adb.htm#ref_444_7">Upper_Left_Corner_Symbol</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>;
717       <FONT COLOR=red><A NAME="ref_712_7" HREF="terminal_interface-curses__adb.htm#ref_445_7">Upper_Right_Corner_Symbol</A></FONT> : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>;
718       <FONT COLOR=red><A NAME="ref_713_7" HREF="terminal_interface-curses__adb.htm#ref_446_7">Lower_Left_Corner_Symbol</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>;
719       Lower_Right_Corner_Symbol : <b>in</b> Attributed_Character := Default_Character
720      );
721    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_border.3x.html">wborder()</A></EM></FONT>
722    <FONT COLOR=green><EM>--  AKA: border()</EM></FONT>
723    <b>pragma</b> Inline (Border);
724
725    <FONT COLOR=green><EM>--  #1A NAME="AFU_26"#2|</EM></FONT>
726    <b>procedure</b> Box
727      (<FONT COLOR=red><A NAME="ref_722_7" HREF="terminal_interface-curses__adb.htm#ref_476_7">Win</A></FONT>               : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Window</A> := Standard_Window;
728       <FONT COLOR=red><A NAME="ref_723_7" HREF="terminal_interface-curses__adb.htm#ref_477_7">Vertical_Symbol</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>;
729       Horizontal_Symbol : <b>in</b> Attributed_Character := Default_Character);
730    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_border.3x.html">box()</A></EM></FONT>
731    <b>pragma</b> Inline (Box);
732
733    <FONT COLOR=green><EM>--  #1A NAME="AFU_27"#2|</EM></FONT>
734    <b>procedure</b> Horizontal_Line
735      (<FONT COLOR=red><A NAME="ref_730_7" HREF="terminal_interface-curses__adb.htm#ref_487_7">Win</A></FONT>         : <b>in</b> Window := Standard_Window;
736       <FONT COLOR=red><A NAME="ref_731_7" HREF="terminal_interface-curses__adb.htm#ref_488_7">Line_Size</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Natural</A>;
737       Line_Symbol : <b>in</b> Attributed_Character := Default_Character);
738    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_border.3x.html">whline()</A></EM></FONT>
739    <FONT COLOR=green><EM>--  AKA: hline()</EM></FONT>
740    <b>pragma</b> Inline (Horizontal_Line);
741
742    <FONT COLOR=green><EM>--  #1A NAME="AFU_28"#2|</EM></FONT>
743    <b>procedure</b> Vertical_Line
744      (<FONT COLOR=red><A NAME="ref_739_7" HREF="terminal_interface-curses__adb.htm#ref_504_7">Win</A></FONT>         : <b>in</b> Window := Standard_Window;
745       <FONT COLOR=red><A NAME="ref_740_7" HREF="terminal_interface-curses__adb.htm#ref_505_7">Line_Size</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Natural</A>;
746       Line_Symbol : <b>in</b> Attributed_Character := Default_Character);
747    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_border.3x.html">wvline()</A></EM></FONT>
748    <FONT COLOR=green><EM>--  AKA: vline()</EM></FONT>
749    <b>pragma</b> Inline (Vertical_Line);
750
751    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
752    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_getch.3x.html">curs_getch.3x</A></EM></FONT>
753    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
754    <FONT COLOR=green><EM>--  Not implemented: mvgetch, mvwgetch</EM></FONT>
755
756    <FONT COLOR=green><EM>--  #1A NAME="AFU_29"#2|</EM></FONT>
757    <b>function</b> Get_Keystroke (Win : Window := Standard_Window)
758                            <b>return</b> Real_Key_Code;
759    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_getch.3x.html">wgetch()</A></EM></FONT>
760    <FONT COLOR=green><EM>--  AKA: getch()</EM></FONT>
761    <FONT COLOR=green><EM>--  Get a character from the keyboard and echo it - if enabled - to the</EM></FONT>
762    <FONT COLOR=green><EM>--  window.</EM></FONT>
763    <FONT COLOR=green><EM>--  If for any reason (i.e. a timeout) we couldn't get a character the</EM></FONT>
764    <FONT COLOR=green><EM>--  returned keycode is Key_None.</EM></FONT>
765    <b>pragma</b> Inline (Get_Keystroke);
766
767    <FONT COLOR=green><EM>--  #1A NAME="AFU_30"#2|</EM></FONT>
768    <b>procedure</b> Undo_Keystroke (Key : <b>in</b> Real_Key_Code);
769    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_getch.3x.html">ungetch()</A></EM></FONT>
770    <b>pragma</b> Inline (Undo_Keystroke);
771
772    <FONT COLOR=green><EM>--  #1A NAME="AFU_31"#2|</EM></FONT>
773    <b>function</b> Has_Key (Key : Special_Key_Code) <b>return</b> Boolean;
774    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_getch.3x.html">has_key()</A></EM></FONT>
775    <b>pragma</b> Inline (Has_Key);
776
777    <FONT COLOR=green><EM>--  |</EM></FONT>
778    <FONT COLOR=green><EM>--  | Some helper functions</EM></FONT>
779    <FONT COLOR=green><EM>--  |</EM></FONT>
780    <b>function</b> Is_Function_Key (Key : Special_Key_Code) <b>return</b> Boolean;
781    <FONT COLOR=green><EM>--  Return True if the Key is a function key (i.e. one of F0 .. F63)</EM></FONT>
782    <b>pragma</b> Inline (Is_Function_Key);
783
784    <b>subtype</b> Function_Key_Number <b>is</b> Integer <b>range</b> 0 .. 63;
785    <FONT COLOR=green><EM>--  (n)curses allows for 64 function keys.</EM></FONT>
786
787    <b>function</b> Function_Key (Key : Real_Key_Code) <b>return</b> Function_Key_Number;
788    <FONT COLOR=green><EM>--  Return the number of the function key. If the code is not a</EM></FONT>
789    <FONT COLOR=green><EM>--  function key, a CONSTRAINT_ERROR will be raised.</EM></FONT>
790    <b>pragma</b> Inline (Function_Key);
791
792    <b>function</b> Function_Key_Code (Key : Function_Key_Number) <b>return</b> Real_Key_Code;
793    <FONT COLOR=green><EM>--  Return the key code for a given function-key number.</EM></FONT>
794    <b>pragma</b> Inline (Function_Key_Code);
795
796    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
797    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_attr.3x.html">curs_attr.3x</A></EM></FONT>
798    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
799    <FONT COLOR=green><EM>--  | Not implemented attr_off,  wattr_off,</EM></FONT>
800    <FONT COLOR=green><EM>--  |  attr_on, wattr_on, attr_set, wattr_set</EM></FONT>
801
802    <FONT COLOR=green><EM>--  PAIR_NUMBER</EM></FONT>
803    <FONT COLOR=green><EM>--  PAIR_NUMBER(c) is the same as c.Color</EM></FONT>
804
805    <FONT COLOR=green><EM>--  #1A NAME="AFU_32"#2|</EM></FONT>
806    <b>procedure</b> Standout (<FONT COLOR=red><A NAME="ref_801_24" HREF="terminal_interface-curses__adb.htm#ref_587_24">Win</A></FONT> : Window  := Standard_Window;
807                        On  : Boolean := True);
808    <FONT COLOR=green><EM>--  AKA: wstandout()</EM></FONT>
809    <FONT COLOR=green><EM>--  AKA: wstandend()</EM></FONT>
810
811    <FONT COLOR=green><EM>--  #1A NAME="AFU_33"#2|</EM></FONT>
812    <b>procedure</b> Switch_Character_Attribute
813      (<FONT COLOR=red><A NAME="ref_808_7" HREF="terminal_interface-curses__adb.htm#ref_608_7">Win</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Window</A> := Standard_Window;
814       <FONT COLOR=red><A NAME="ref_809_7" HREF="terminal_interface-curses__adb.htm#ref_609_7">Attr</A></FONT> : <b>in</b> Character_Attribute_Set := Normal_Video;
815       On   : <b>in</b> Boolean := True); <FONT COLOR=green><EM>--  if False we switch Off.</EM></FONT>
816    <FONT COLOR=green><EM>--  Switches those Attributes set to true in the list.</EM></FONT>
817    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_attr.3x.html">wattron()</A></EM></FONT>
818    <FONT COLOR=green><EM>--  AKA: wattroff()</EM></FONT>
819    <FONT COLOR=green><EM>--  AKA: attron()</EM></FONT>
820    <FONT COLOR=green><EM>--  AKA: attroff()</EM></FONT>
821
822    <FONT COLOR=green><EM>--  #1A NAME="AFU_34"#2|</EM></FONT>
823    <b>procedure</b> Set_Character_Attributes
824      (<FONT COLOR=red><A NAME="ref_819_7" HREF="terminal_interface-curses__adb.htm#ref_636_7">Win</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Window</A> := Standard_Window;
825       <FONT COLOR=red><A NAME="ref_820_7" HREF="terminal_interface-curses__adb.htm#ref_637_7">Attr</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Character_Attribute_Set</A> := Normal_Video;
826       Color : <b>in</b> Color_Pair := Color_Pair'First);
827    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_attr.3x.html">wattrset()</A></EM></FONT>
828    <FONT COLOR=green><EM>--  AKA: attrset()</EM></FONT>
829    <b>pragma</b> Inline (Set_Character_Attributes);
830
831    <FONT COLOR=green><EM>--  #1A NAME="AFU_35"#2|</EM></FONT>
832    <b>function</b> Get_Character_Attribute
833      (Win : <b>in</b> Window := Standard_Window) <b>return</b> Character_Attribute_Set;
834    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_attr.3x.html">wattr_get()</A></EM></FONT>
835    <FONT COLOR=green><EM>--  AKA: attr_get()</EM></FONT>
836
837    <FONT COLOR=green><EM>--  #1A NAME="AFU_36"#2|</EM></FONT>
838    <b>function</b> Get_Character_Attribute
839      (Win : <b>in</b> Window := Standard_Window) <b>return</b> Color_Pair;
840    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_attr.3x.html">wattr_get()</A></EM></FONT>
841    <b>pragma</b> Inline (Get_Character_Attribute);
842
843    <FONT COLOR=green><EM>--  #1A NAME="AFU_37"#2|</EM></FONT>
844    <b>procedure</b> Set_Color (<FONT COLOR=red><A NAME="ref_839_25" HREF="terminal_interface-curses__adb.htm#ref_699_25">Win</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Window</A> := Standard_Window;
845                         Pair : <b>in</b> Color_Pair);
846    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_attr.3x.html">wcolor_set()</A></EM></FONT>
847    <FONT COLOR=green><EM>--  AKA: color_set()</EM></FONT>
848    <b>pragma</b> Inline (Set_Color);
849
850    <FONT COLOR=green><EM>--  #1A NAME="AFU_38"#2|</EM></FONT>
851    <b>procedure</b> Change_Attributes
852      (<FONT COLOR=red><A NAME="ref_847_7" HREF="terminal_interface-curses__adb.htm#ref_715_7">Win</A></FONT>   : <b>in</b> Window := Standard_Window;
853       <FONT COLOR=red><A NAME="ref_848_7" HREF="terminal_interface-curses__adb.htm#ref_716_7">Count</A></FONT> : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Integer</A> := -1;
854       <FONT COLOR=red><A NAME="ref_849_7" HREF="terminal_interface-curses__adb.htm#ref_717_7">Attr</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Character_Attribute_Set</A> := Normal_Video;
855       Color : <b>in</b> Color_Pair := Color_Pair'First);
856    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_attr.3x.html">wchgat()</A></EM></FONT>
857    <FONT COLOR=green><EM>--  AKA: chgat()</EM></FONT>
858
859    <FONT COLOR=green><EM>--  #1A NAME="AFU_39"#2|</EM></FONT>
860    <b>procedure</b> Change_Attributes
861      (<FONT COLOR=red><A NAME="ref_856_7" HREF="terminal_interface-curses__adb.htm#ref_738_7">Win</A></FONT>    : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;
862       <FONT COLOR=red><A NAME="ref_857_7" HREF="terminal_interface-curses__adb.htm#ref_739_7">Line</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A> := Line_Position'First;
863       <FONT COLOR=red><A NAME="ref_858_7" HREF="terminal_interface-curses__adb.htm#ref_740_7">Column</A></FONT> : <b>in</b> Column_Position := Column_Position'First;
864       <FONT COLOR=red><A NAME="ref_859_7" HREF="terminal_interface-curses__adb.htm#ref_741_7">Count</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Integer</A> := -1;
865       <FONT COLOR=red><A NAME="ref_860_7" HREF="terminal_interface-curses__adb.htm#ref_742_7">Attr</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Character_Attribute_Set</A> := Normal_Video;
866       Color  : <b>in</b> Color_Pair := Color_Pair'First);
867    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_attr.3x.html">mvwchgat()</A></EM></FONT>
868    <FONT COLOR=green><EM>--  AKA: mvchgat()</EM></FONT>
869    <b>pragma</b> Inline (Change_Attributes);
870
871    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
872    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_beep.3x.html">curs_beep.3x</A></EM></FONT>
873    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
874
875    <FONT COLOR=green><EM>--  #1A NAME="AFU_40"#2|</EM></FONT>
876    <b>procedure</b> Beep;
877    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_beep.3x.html">beep()</A></EM></FONT>
878    <b>pragma</b> Inline (Beep);
879
880    <FONT COLOR=green><EM>--  #1A NAME="AFU_41"#2|</EM></FONT>
881    <b>procedure</b> Flash_Screen;
882    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_beep.3x.html">flash()</A></EM></FONT>
883    <b>pragma</b> Inline (Flash_Screen);
884
885    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
886    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_inopts.3x.html">curs_inopts.3x</A></EM></FONT>
887    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
888
889    <FONT COLOR=green><EM>--  | Not implemented : typeahead</EM></FONT>
890    <FONT COLOR=green><EM>--</EM></FONT>
891    <FONT COLOR=green><EM>--  #1A NAME="AFU_42"#2|</EM></FONT>
892    <b>procedure</b> Set_Cbreak_Mode (SwitchOn : <b>in</b> Boolean := True);
893    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_inopts.3x.html">cbreak()</A></EM></FONT>
894    <FONT COLOR=green><EM>--  AKA: nocbreak()</EM></FONT>
895    <b>pragma</b> Inline (Set_Cbreak_Mode);
896
897    <FONT COLOR=green><EM>--  #1A NAME="AFU_43"#2|</EM></FONT>
898    <b>procedure</b> Set_Raw_Mode (SwitchOn : <b>in</b> Boolean := True);
899    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_inopts.3x.html">raw()</A></EM></FONT>
900    <FONT COLOR=green><EM>--  AKA: noraw()</EM></FONT>
901    <b>pragma</b> Inline (Set_Raw_Mode);
902
903    <FONT COLOR=green><EM>--  #1A NAME="AFU_44"#2|</EM></FONT>
904    <b>procedure</b> Set_Echo_Mode (SwitchOn : <b>in</b> Boolean := True);
905    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_inopts.3x.html">echo()</A></EM></FONT>
906    <FONT COLOR=green><EM>--  AKA: noecho()</EM></FONT>
907    <b>pragma</b> Inline (Set_Echo_Mode);
908
909    <FONT COLOR=green><EM>--  #1A NAME="AFU_45"#2|</EM></FONT>
910    <b>procedure</b> Set_Meta_Mode (<FONT COLOR=red><A NAME="ref_905_29" HREF="terminal_interface-curses__adb.htm#ref_827_29">Win</A></FONT>      : <b>in</b> Window := Standard_Window;
911                             SwitchOn : <b>in</b> Boolean := True);
912    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_inopts.3x.html">meta()</A></EM></FONT>
913    <b>pragma</b> Inline (Set_Meta_Mode);
914
915    <FONT COLOR=green><EM>--  #1A NAME="AFU_46"#2|</EM></FONT>
916    <b>procedure</b> Set_KeyPad_Mode (<FONT COLOR=red><A NAME="ref_911_31" HREF="terminal_interface-curses__adb.htm#ref_838_31">Win</A></FONT>      : <b>in</b> Window := Standard_Window;
917                               SwitchOn : <b>in</b> Boolean := True);
918    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_inopts.3x.html">keypad()</A></EM></FONT>
919    <b>pragma</b> Inline (Set_KeyPad_Mode);
920
921    <b>function</b> Get_KeyPad_Mode (Win : <b>in</b> Window := Standard_Window)
922                              <b>return</b> Boolean;
923    <FONT COLOR=green><EM>--  This has no pendant in C. There you've to look into the WINDOWS</EM></FONT>
924    <FONT COLOR=green><EM>--  structure to get the value. Bad practice, not repeated in Ada.</EM></FONT>
925
926    <b>type</b> Half_Delay_Amount <b>is</b> <b>range</b> 1 .. 255;
927
928    <FONT COLOR=green><EM>--  #1A NAME="AFU_47"#2|</EM></FONT>
929    <b>procedure</b> Half_Delay (Amount : <b>in</b> Half_Delay_Amount);
930    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_inopts.3x.html">halfdelay()</A></EM></FONT>
931    <b>pragma</b> Inline (Half_Delay);
932
933    <FONT COLOR=green><EM>--  #1A NAME="AFU_48"#2|</EM></FONT>
934    <b>procedure</b> Set_Flush_On_Interrupt_Mode
935      (<FONT COLOR=red><A NAME="ref_930_7" HREF="terminal_interface-curses__adb.htm#ref_869_7">Win</A></FONT>  : <b>in</b> Window := Standard_Window;
936       Mode : <b>in</b> Boolean := True);
937    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_inopts.3x.html">intrflush()</A></EM></FONT>
938    <b>pragma</b> Inline (Set_Flush_On_Interrupt_Mode);
939
940    <FONT COLOR=green><EM>--  #1A NAME="AFU_49"#2|</EM></FONT>
941    <b>procedure</b> Set_Queue_Interrupt_Mode
942      (<FONT COLOR=red><A NAME="ref_937_7" HREF="terminal_interface-curses__adb.htm#ref_881_7">Win</A></FONT>   : <b>in</b> Window := Standard_Window;
943       Flush : <b>in</b> Boolean := True);
944    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_inopts.3x.html">qiflush()</A></EM></FONT>
945    <FONT COLOR=green><EM>--  AKA: noqiflush()</EM></FONT>
946    <b>pragma</b> Inline (Set_Queue_Interrupt_Mode);
947
948    <FONT COLOR=green><EM>--  #1A NAME="AFU_50"#2|</EM></FONT>
949    <b>procedure</b> Set_NoDelay_Mode
950      (<FONT COLOR=red><A NAME="ref_945_7" HREF="terminal_interface-curses__adb.htm#ref_900_7">Win</A></FONT>  : <b>in</b> Window := Standard_Window;
951       Mode : <b>in</b> Boolean := False);
952    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_inopts.3x.html">nodelay()</A></EM></FONT>
953    <b>pragma</b> Inline (Set_NoDelay_Mode);
954
955    <b>type</b> Timeout_Mode <b>is</b> (Blocking, Non_Blocking, Delayed);
956
957    <FONT COLOR=green><EM>--  #1A NAME="AFU_51"#2|</EM></FONT>
958    <b>procedure</b> Set_Timeout_Mode (<FONT COLOR=red><A NAME="ref_953_32" HREF="terminal_interface-curses__adb.htm#ref_911_32">Win</A></FONT>    : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_949_9">Window</A> := Standard_Window;
959                                <FONT COLOR=red><A NAME="ref_954_32" HREF="terminal_interface-curses__adb.htm#ref_912_32">Mode</A></FONT>   : <b>in</b> Timeout_Mode;
960                                Amount : <b>in</b> Natural); <FONT COLOR=green><EM>--  in Milliseconds</EM></FONT>
961    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_inopts.3x.html">wtimeout()</A></EM></FONT>
962    <FONT COLOR=green><EM>--  AKA: timeout()</EM></FONT>
963    <FONT COLOR=green><EM>--  Instead of overloading the semantic of the sign of amount, we</EM></FONT>
964    <FONT COLOR=green><EM>--  introduce the Timeout_Mode parameter. This should improve</EM></FONT>
965    <FONT COLOR=green><EM>--  readability. For Blocking and Non_Blocking, the Amount is not</EM></FONT>
966    <FONT COLOR=green><EM>--  evaluated.</EM></FONT>
967    <FONT COLOR=green><EM>--  We don't inline this procedure.</EM></FONT>
968
969    <FONT COLOR=green><EM>--  #1A NAME="AFU_52"#2|</EM></FONT>
970    <b>procedure</b> Set_Escape_Timer_Mode
971      (<FONT COLOR=red><A NAME="ref_966_7" HREF="terminal_interface-curses__adb.htm#ref_933_7">Win</A></FONT>       : <b>in</b> Window := Standard_Window;
972       Timer_Off : <b>in</b> Boolean := False);
973    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_inopts.3x.html">notimeout()</A></EM></FONT>
974    <b>pragma</b> Inline (Set_Escape_Timer_Mode);
975
976    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
977    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_outopts.3x.html">curs_outopts.3x</A></EM></FONT>
978    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
979
980    <FONT COLOR=green><EM>--  #1A NAME="AFU_53"#2|</EM></FONT>
981    <b>procedure</b> Set_NL_Mode (SwitchOn : <b>in</b> Boolean := True);
982    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_outopts.3x.html">nl()</A></EM></FONT>
983    <FONT COLOR=green><EM>--  AKA: nonl()</EM></FONT>
984    <b>pragma</b> Inline (Set_NL_Mode);
985
986    <FONT COLOR=green><EM>--  #1A NAME="AFU_54"#2|</EM></FONT>
987    <b>procedure</b> Clear_On_Next_Update
988      (<FONT COLOR=red><A NAME="ref_983_7" HREF="terminal_interface-curses__adb.htm#ref_966_7">Win</A></FONT>      : <b>in</b> Window := Standard_Window;
989       Do_Clear : <b>in</b> Boolean := True);
990    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_outopts.3x.html">clearok()</A></EM></FONT>
991    <b>pragma</b> Inline (Clear_On_Next_Update);
992
993    <FONT COLOR=green><EM>--  #1A NAME="AFU_55"#2|</EM></FONT>
994    <b>procedure</b> Use_Insert_Delete_Line
995      (<FONT COLOR=red><A NAME="ref_990_7" HREF="terminal_interface-curses__adb.htm#ref_978_7">Win</A></FONT>    : <b>in</b> Window := Standard_Window;
996       Do_Idl : <b>in</b> Boolean := True);
997    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_outopts.3x.html">idlok()</A></EM></FONT>
998    <b>pragma</b> Inline (Use_Insert_Delete_Line);
999
1000    <FONT COLOR=green><EM>--  #1A NAME="AFU_56"#2|</EM></FONT>
1001    <b>procedure</b> Use_Insert_Delete_Character
1002      (<FONT COLOR=red><A NAME="ref_997_7" HREF="terminal_interface-curses__adb.htm#ref_990_7">Win</A></FONT>    : <b>in</b> Window := Standard_Window;
1003       Do_Idc : <b>in</b> Boolean := True);
1004    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_outopts.3x.html">idcok()</A></EM></FONT>
1005    <b>pragma</b> Inline (Use_Insert_Delete_Character);
1006
1007    <FONT COLOR=green><EM>--  #1A NAME="AFU_57"#2|</EM></FONT>
1008    <b>procedure</b> Leave_Cursor_After_Update
1009      (<FONT COLOR=red><A NAME="ref_1004_7" HREF="terminal_interface-curses__adb.htm#ref_1000_7">Win</A></FONT>      : <b>in</b> Window := Standard_Window;
1010       Do_Leave : <b>in</b> Boolean := True);
1011    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_outopts.3x.html">leaveok()</A></EM></FONT>
1012    <b>pragma</b> Inline (Leave_Cursor_After_Update);
1013
1014    <FONT COLOR=green><EM>--  #1A NAME="AFU_58"#2|</EM></FONT>
1015    <b>procedure</b> Immediate_Update_Mode
1016      (<FONT COLOR=red><A NAME="ref_1011_7" HREF="terminal_interface-curses__adb.htm#ref_1012_7">Win</A></FONT>  : <b>in</b> Window := Standard_Window;
1017       Mode : <b>in</b> Boolean := False);
1018    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_outopts.3x.html">immedok()</A></EM></FONT>
1019    <b>pragma</b> Inline (Immediate_Update_Mode);
1020
1021    <FONT COLOR=green><EM>--  #1A NAME="AFU_59"#2|</EM></FONT>
1022    <b>procedure</b> Allow_Scrolling
1023      (<FONT COLOR=red><A NAME="ref_1018_7" HREF="terminal_interface-curses__adb.htm#ref_1022_7">Win</A></FONT>  : <b>in</b> Window := Standard_Window;
1024       Mode : <b>in</b> Boolean := False);
1025    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_outopts.3x.html">scrollok()</A></EM></FONT>
1026    <b>pragma</b> Inline (Allow_Scrolling);
1027
1028    <b>function</b> Scrolling_Allowed (Win : Window := Standard_Window) <b>return</b> Boolean;
1029    <FONT COLOR=green><EM>--  There is no such function in the C interface.</EM></FONT>
1030    <b>pragma</b> Inline (Scrolling_Allowed);
1031
1032    <FONT COLOR=green><EM>--  #1A NAME="AFU_60"#2|</EM></FONT>
1033    <b>procedure</b> Set_Scroll_Region
1034      (<FONT COLOR=red><A NAME="ref_1029_7" HREF="terminal_interface-curses__adb.htm#ref_1043_7">Win</A></FONT>         : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;
1035       <FONT COLOR=red><A NAME="ref_1030_7" HREF="terminal_interface-curses__adb.htm#ref_1044_7">Top_Line</A></FONT>    : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;
1036       Bottom_Line : <b>in</b> Line_Position);
1037    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_outopts.3x.html">wsetscrreg()</A></EM></FONT>
1038    <FONT COLOR=green><EM>--  AKA: setscrreg()</EM></FONT>
1039    <b>pragma</b> Inline (Set_Scroll_Region);
1040
1041    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1042    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_refresh.3x.html">curs_refresh.3x</A></EM></FONT>
1043    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1044
1045    <FONT COLOR=green><EM>--  #1A NAME="AFU_61"#2|</EM></FONT>
1046    <b>procedure</b> Update_Screen;
1047    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_refresh.3x.html">doupdate()</A></EM></FONT>
1048    <b>pragma</b> Inline (Update_Screen);
1049
1050    <FONT COLOR=green><EM>--  #1A NAME="AFU_62"#2|</EM></FONT>
1051    <b>procedure</b> Refresh (Win : <b>in</b> Window := Standard_Window);
1052    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_refresh.3x.html">wrefresh()</A></EM></FONT>
1053    <FONT COLOR=green><EM>--  There is an overloaded Refresh for Pads.</EM></FONT>
1054    <FONT COLOR=green><EM>--  The Inline pragma appears there</EM></FONT>
1055    <FONT COLOR=green><EM>--  AKA: refresh()</EM></FONT>
1056
1057    <FONT COLOR=green><EM>--  #1A NAME="AFU_63"#2|</EM></FONT>
1058    <b>procedure</b> Refresh_Without_Update
1059      (Win : <b>in</b> Window := Standard_Window);
1060    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_refresh.3x.html">wnoutrefresh()</A></EM></FONT>
1061    <FONT COLOR=green><EM>--  There is an overloaded Refresh_Without_Update for Pads.</EM></FONT>
1062    <FONT COLOR=green><EM>--  The Inline pragma appears there</EM></FONT>
1063
1064    <FONT COLOR=green><EM>--  #1A NAME="AFU_64"#2|</EM></FONT>
1065    <b>procedure</b> Redraw (Win : <b>in</b> Window := Standard_Window);
1066    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_refresh.3x.html">redrawwin()</A></EM></FONT>
1067
1068    <FONT COLOR=green><EM>--  #1A NAME="AFU_65"#2|</EM></FONT>
1069    <b>procedure</b> Redraw (<FONT COLOR=red><A NAME="ref_1064_22" HREF="terminal_interface-curses__adb.htm#ref_1100_7">Win</A></FONT>        : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;
1070                      <FONT COLOR=red><A NAME="ref_1065_22" HREF="terminal_interface-curses__adb.htm#ref_1101_7">Begin_Line</A></FONT> : <b>in</b> Line_Position;
1071                      Line_Count : <b>in</b> Positive);
1072    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_refresh.3x.html">wredrawln()</A></EM></FONT>
1073    <b>pragma</b> Inline (Redraw);
1074
1075    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1076    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_clear.3x.html">curs_clear.3x</A></EM></FONT>
1077    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1078
1079    <FONT COLOR=green><EM>--  #1A NAME="AFU_66"#2|</EM></FONT>
1080    <b>procedure</b> Erase (Win : <b>in</b> Window := Standard_Window);
1081    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_clear.3x.html">werase()</A></EM></FONT>
1082    <FONT COLOR=green><EM>--  AKA: erase()</EM></FONT>
1083    <b>pragma</b> Inline (Erase);
1084
1085    <FONT COLOR=green><EM>--  #1A NAME="AFU_67"#2|</EM></FONT>
1086    <b>procedure</b> Clear
1087      (Win : <b>in</b> Window := Standard_Window);
1088    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_clear.3x.html">wclear()</A></EM></FONT>
1089    <FONT COLOR=green><EM>--  AKA: clear()</EM></FONT>
1090    <b>pragma</b> Inline (Clear);
1091
1092    <FONT COLOR=green><EM>--  #1A NAME="AFU_68"#2|</EM></FONT>
1093    <b>procedure</b> Clear_To_End_Of_Screen
1094      (Win : <b>in</b> Window := Standard_Window);
1095    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_clear.3x.html">wclrtobot()</A></EM></FONT>
1096    <FONT COLOR=green><EM>--  AKA: clrtobot()</EM></FONT>
1097    <b>pragma</b> Inline (Clear_To_End_Of_Screen);
1098
1099    <FONT COLOR=green><EM>--  #1A NAME="AFU_69"#2|</EM></FONT>
1100    <b>procedure</b> Clear_To_End_Of_Line
1101      (Win : <b>in</b> Window := Standard_Window);
1102    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_clear.3x.html">wclrtoeol()</A></EM></FONT>
1103    <FONT COLOR=green><EM>--  AKA: clrtoeol()</EM></FONT>
1104    <b>pragma</b> Inline (Clear_To_End_Of_Line);
1105
1106    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1107    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_bkgd.3x.html">curs_bkgd.3x</A></EM></FONT>
1108    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1109
1110    <FONT COLOR=green><EM>--  #1A NAME="AFU_70"#2|</EM></FONT>
1111    <FONT COLOR=green><EM>--  TODO: we could have Set_Background(Window; Character_Attribute_Set)</EM></FONT>
1112    <FONT COLOR=green><EM>--  because in C it is common to see bkgdset(A_BOLD) or</EM></FONT>
1113    <FONT COLOR=green><EM>--  bkgdset(COLOR_PAIR(n))</EM></FONT>
1114    <b>procedure</b> Set_Background
1115      (<FONT COLOR=red><A NAME="ref_1110_7" HREF="terminal_interface-curses__adb.htm#ref_1157_7">Win</A></FONT> : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Window</A> := Standard_Window;
1116       Ch  : <b>in</b> Attributed_Character);
1117    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_bkgd.3x.html">wbkgdset()</A></EM></FONT>
1118    <FONT COLOR=green><EM>--  AKA: bkgdset()</EM></FONT>
1119    <b>pragma</b> Inline (Set_Background);
1120
1121    <FONT COLOR=green><EM>--  #1A NAME="AFU_71"#2|</EM></FONT>
1122    <b>procedure</b> Change_Background
1123      (<FONT COLOR=red><A NAME="ref_1118_7" HREF="terminal_interface-curses__adb.htm#ref_1167_7">Win</A></FONT> : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Window</A> := Standard_Window;
1124       Ch  : <b>in</b> Attributed_Character);
1125    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_bkgd.3x.html">wbkgd()</A></EM></FONT>
1126    <FONT COLOR=green><EM>--  AKA: bkgd()</EM></FONT>
1127    <b>pragma</b> Inline (Change_Background);
1128
1129    <FONT COLOR=green><EM>--  #1A NAME="AFU_72"#2|</EM></FONT>
1130    <FONT COLOR=green><EM>--  ? wbkgdget is not listed in curs_bkgd, getbkgd is thpough.</EM></FONT>
1131    <b>function</b> <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Get_Background</A> (Win : Window := Standard_Window)
1132      <b>return</b> Attributed_Character;
1133    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_bkgd.3x.html">wbkgdget()</A></EM></FONT>
1134    <FONT COLOR=green><EM>--  AKA: bkgdget()</EM></FONT>
1135    <b>pragma</b> Inline (Get_Background);
1136
1137    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1138    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_touch.3x.html">curs_touch.3x</A></EM></FONT>
1139    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1140
1141    <FONT COLOR=green><EM>--  #1A NAME="AFU_73"#2|</EM></FONT>
1142    <b>procedure</b> Untouch (Win : <b>in</b> Window := Standard_Window);
1143    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_touch.3x.html">untouchwin()</A></EM></FONT>
1144    <b>pragma</b> Inline (Untouch);
1145
1146    <FONT COLOR=green><EM>--  #1A NAME="AFU_74"#2|</EM></FONT>
1147    <b>procedure</b> Touch (Win : <b>in</b> Window := Standard_Window);
1148    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_touch.3x.html">touchwin()</A></EM></FONT>
1149
1150    <FONT COLOR=green><EM>--  #1A NAME="AFU_75"#2|</EM></FONT>
1151    <b>procedure</b> Touch (<FONT COLOR=red><A NAME="ref_1146_21" HREF="terminal_interface-curses__adb.htm#ref_1222_21">Win</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;
1152                     <FONT COLOR=red><A NAME="ref_1147_21" HREF="terminal_interface-curses__adb.htm#ref_1223_21">Start</A></FONT> : <b>in</b> Line_Position;
1153                     Count : <b>in</b> Positive);
1154    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_touch.3x.html">touchline()</A></EM></FONT>
1155    <b>pragma</b> Inline (Touch);
1156
1157    <FONT COLOR=green><EM>--  #1A NAME="AFU_76"#2|</EM></FONT>
1158    <b>procedure</b> Change_Lines_Status (<FONT COLOR=red><A NAME="ref_1153_35" HREF="terminal_interface-curses__adb.htm#ref_1187_35">Win</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;
1159                                   <FONT COLOR=red><A NAME="ref_1154_35" HREF="terminal_interface-curses__adb.htm#ref_1188_35">Start</A></FONT> : <b>in</b> Line_Position;
1160                                   <FONT COLOR=red><A NAME="ref_1155_35" HREF="terminal_interface-curses__adb.htm#ref_1189_35">Count</A></FONT> : <b>in</b> Positive;
1161                                   State : <b>in</b> Boolean);
1162    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_touch.3x.html">wtouchln()</A></EM></FONT>
1163    <b>pragma</b> Inline (Change_Lines_Status);
1164
1165    <FONT COLOR=green><EM>--  #1A NAME="AFU_77"#2|</EM></FONT>
1166    <b>function</b> Is_Touched (<FONT COLOR=red><A NAME="ref_1161_25" HREF="terminal_interface-curses__adb.htm#ref_1231_7">Win</A></FONT>  : <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;
1167                         Line : Line_Position) <b>return</b> Boolean;
1168    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_touch.3x.html">is_linetouched()</A></EM></FONT>
1169
1170    <FONT COLOR=green><EM>--  #1A NAME="AFU_78"#2|</EM></FONT>
1171    <b>function</b> Is_Touched (Win : Window := Standard_Window) <b>return</b> Boolean;
1172    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_touch.3x.html">is_wintouched()</A></EM></FONT>
1173    <b>pragma</b> Inline (Is_Touched);
1174
1175    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1176    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_overlay.3x.html">curs_overlay.3x</A></EM></FONT>
1177    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1178
1179    <FONT COLOR=green><EM>--  #1A NAME="AFU_79"#2|</EM></FONT>
1180    <b>procedure</b> Copy
1181      (<FONT COLOR=red><A NAME="ref_1176_7" HREF="terminal_interface-curses__adb.htm#ref_1258_7">Source_Window</A></FONT>            : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;
1182       <FONT COLOR=red><A NAME="ref_1177_7" HREF="terminal_interface-curses__adb.htm#ref_1259_7">Destination_Window</A></FONT>       : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A>;
1183       <FONT COLOR=red><A NAME="ref_1178_7" HREF="terminal_interface-curses__adb.htm#ref_1260_7">Source_Top_Row</A></FONT>           : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
1184       <FONT COLOR=red><A NAME="ref_1179_7" HREF="terminal_interface-curses__adb.htm#ref_1261_7">Source_Left_Column</A></FONT>       : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Column_Position</A>;
1185       <FONT COLOR=red><A NAME="ref_1180_7" HREF="terminal_interface-curses__adb.htm#ref_1262_7">Destination_Top_Row</A></FONT>      : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
1186       <FONT COLOR=red><A NAME="ref_1181_7" HREF="terminal_interface-curses__adb.htm#ref_1263_7">Destination_Left_Column</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Column_Position</A>;
1187       <FONT COLOR=red><A NAME="ref_1182_7" HREF="terminal_interface-curses__adb.htm#ref_1264_7">Destination_Bottom_Row</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
1188       <FONT COLOR=red><A NAME="ref_1183_7" HREF="terminal_interface-curses__adb.htm#ref_1265_7">Destination_Right_Column</A></FONT> : <b>in</b> Column_Position;
1189       Non_Destructive_Mode     : <b>in</b> Boolean := True);
1190    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_overlay.3x.html">copywin()</A></EM></FONT>
1191    <b>pragma</b> Inline (Copy);
1192
1193    <FONT COLOR=green><EM>--  #1A NAME="AFU_80"#2|</EM></FONT>
1194    <b>procedure</b> Overwrite (<FONT COLOR=red><A NAME="ref_1189_25" HREF="terminal_interface-curses__adb.htm#ref_1294_7">Source_Window</A></FONT>      : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;
1195                         Destination_Window : <b>in</b> Window);
1196    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_overlay.3x.html">overwrite()</A></EM></FONT>
1197    <b>pragma</b> Inline (Overwrite);
1198
1199    <FONT COLOR=green><EM>--  #1A NAME="AFU_81"#2|</EM></FONT>
1200    <b>procedure</b> Overlay (<FONT COLOR=red><A NAME="ref_1195_23" HREF="terminal_interface-curses__adb.htm#ref_1306_7">Source_Window</A></FONT>      : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;
1201                       Destination_Window : <b>in</b> Window);
1202    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_overlay.3x.html">overlay()</A></EM></FONT>
1203    <b>pragma</b> Inline (Overlay);
1204
1205    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1206    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_deleteln.3x.html">curs_deleteln.3x</A></EM></FONT>
1207    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1208
1209    <FONT COLOR=green><EM>--  #1A NAME="AFU_82"#2|</EM></FONT>
1210    <b>procedure</b> Insert_Delete_Lines
1211      (<FONT COLOR=red><A NAME="ref_1206_7" HREF="terminal_interface-curses__adb.htm#ref_1319_7">Win</A></FONT>   : <b>in</b> Window  := Standard_Window;
1212       Lines : <b>in</b> Integer := 1); <FONT COLOR=green><EM>--  default is to insert one line above</EM></FONT>
1213    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_deleteln.3x.html">winsdelln()</A></EM></FONT>
1214    <FONT COLOR=green><EM>--  AKA: insdelln()</EM></FONT>
1215    <b>pragma</b> Inline (Insert_Delete_Lines);
1216
1217    <FONT COLOR=green><EM>--  #1A NAME="AFU_83"#2|</EM></FONT>
1218    <b>procedure</b> Delete_Line (Win : <b>in</b> Window := Standard_Window);
1219    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_deleteln.3x.html">wdeleteln()</A></EM></FONT>
1220    <FONT COLOR=green><EM>--  AKA: deleteln()</EM></FONT>
1221    <b>pragma</b> Inline (Delete_Line);
1222
1223    <FONT COLOR=green><EM>--  #1A NAME="AFU_84"#2|</EM></FONT>
1224    <b>procedure</b> Insert_Line (Win : <b>in</b> Window := Standard_Window);
1225    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_deleteln.3x.html">winsertln()</A></EM></FONT>
1226    <FONT COLOR=green><EM>--  AKA: insertln()</EM></FONT>
1227    <b>pragma</b> Inline (Insert_Line);
1228
1229    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1230    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_getyx.3x.html">curs_getyx.3x</A></EM></FONT>
1231    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1232
1233    <FONT COLOR=green><EM>--  #1A NAME="AFU_85"#2|</EM></FONT>
1234    <b>procedure</b> Get_Size
1235      (<FONT COLOR=red><A NAME="ref_1230_7" HREF="terminal_interface-curses__adb.htm#ref_1344_7">Win</A></FONT>               : <b>in</b> Window := Standard_Window;
1236       <FONT COLOR=red><A NAME="ref_1231_7" HREF="terminal_interface-curses__adb.htm#ref_1345_7">Number_Of_Lines</A></FONT>   : <b>out</b> <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Line_Count</A>;
1237       Number_Of_Columns : <b>out</b> Column_Count);
1238    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_getyx.3x.html">getmaxyx()</A></EM></FONT>
1239    <b>pragma</b> Inline (Get_Size);
1240
1241    <FONT COLOR=green><EM>--  #1A NAME="AFU_86"#2|</EM></FONT>
1242    <b>procedure</b> Get_Window_Position
1243      (<FONT COLOR=red><A NAME="ref_1238_7" HREF="terminal_interface-curses__adb.htm#ref_1364_7">Win</A></FONT>             : <b>in</b> Window := Standard_Window;
1244       <FONT COLOR=red><A NAME="ref_1239_7" HREF="terminal_interface-curses__adb.htm#ref_1365_7">Top_Left_Line</A></FONT>   : <b>out</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
1245       Top_Left_Column : <b>out</b> Column_Position);
1246    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_getyx.3x.html">getbegyx()</A></EM></FONT>
1247    <b>pragma</b> Inline (Get_Window_Position);
1248
1249    <FONT COLOR=green><EM>--  #1A NAME="AFU_87"#2|</EM></FONT>
1250    <b>procedure</b> Get_Cursor_Position
1251      (<FONT COLOR=red><A NAME="ref_1246_7" HREF="terminal_interface-curses__adb.htm#ref_1382_7">Win</A></FONT>    : <b>in</b>  <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;
1252       <FONT COLOR=red><A NAME="ref_1247_7" HREF="terminal_interface-curses__adb.htm#ref_1383_7">Line</A></FONT>   : <b>out</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
1253       Column : <b>out</b> Column_Position);
1254    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_getyx.3x.html">getyx()</A></EM></FONT>
1255    <b>pragma</b> Inline (Get_Cursor_Position);
1256
1257    <FONT COLOR=green><EM>--  #1A NAME="AFU_88"#2|</EM></FONT>
1258    <b>procedure</b> Get_Origin_Relative_To_Parent
1259      (<FONT COLOR=red><A NAME="ref_1254_7" HREF="terminal_interface-curses__adb.htm#ref_1400_7">Win</A></FONT>                : <b>in</b>  <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A>;
1260       <FONT COLOR=red><A NAME="ref_1255_7" HREF="terminal_interface-curses__adb.htm#ref_1401_7">Top_Left_Line</A></FONT>      : <b>out</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
1261       <FONT COLOR=red><A NAME="ref_1256_7" HREF="terminal_interface-curses__adb.htm#ref_1402_7">Top_Left_Column</A></FONT>    : <b>out</b> Column_Position;
1262       Is_Not_A_Subwindow : <b>out</b> Boolean);
1263    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_getyx.3x.html">getparyx()</A></EM></FONT>
1264    <FONT COLOR=green><EM>--  Instead of placing -1 in the coordinates as return, we use a boolean</EM></FONT>
1265    <FONT COLOR=green><EM>--  to return the info that the window has no parent.</EM></FONT>
1266    <b>pragma</b> Inline (Get_Origin_Relative_To_Parent);
1267
1268    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1269    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_pad.3x.html">curs_pad.3x</A></EM></FONT>
1270    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1271
1272    <FONT COLOR=green><EM>--  #1A NAME="AFU_89"#2|</EM></FONT>
1273    <b>function</b> New_Pad (<FONT COLOR=red><A NAME="ref_1268_22" HREF="terminal_interface-curses__adb.htm#ref_1425_22">Lines</A></FONT>   : <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Line_Count</A>;
1274                      Columns : Column_Count) <b>return</b> Window;
1275    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_pad.3x.html">newpad()</A></EM></FONT>
1276    <b>pragma</b> Inline (New_Pad);
1277
1278    <FONT COLOR=green><EM>--  #1A NAME="AFU_90"#2|</EM></FONT>
1279    <b>function</b> Sub_Pad
1280      (<FONT COLOR=red><A NAME="ref_1275_7" HREF="terminal_interface-curses__adb.htm#ref_1441_7">Pad</A></FONT>                   : <A HREF="terminal_interface-curses__ads.htm#ref_63_12">Window</A>;
1281       <FONT COLOR=red><A NAME="ref_1276_7" HREF="terminal_interface-curses__adb.htm#ref_1442_7">Number_Of_Lines</A></FONT>       : <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Line_Count</A>;
1282       <FONT COLOR=red><A NAME="ref_1277_7" HREF="terminal_interface-curses__adb.htm#ref_1443_7">Number_Of_Columns</A></FONT>     : <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Column_Count</A>;
1283       <FONT COLOR=red><A NAME="ref_1278_7" HREF="terminal_interface-curses__adb.htm#ref_1444_7">First_Line_Position</A></FONT>   : <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
1284       First_Column_Position : Column_Position) <b>return</b> Window;
1285    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_pad.3x.html">subpad()</A></EM></FONT>
1286    <b>pragma</b> Inline (Sub_Pad);
1287
1288    <FONT COLOR=green><EM>--  #1A NAME="AFU_91"#2|</EM></FONT>
1289    <b>procedure</b> Refresh
1290      (<FONT COLOR=red><A NAME="ref_1285_7" HREF="terminal_interface-curses__adb.htm#ref_1469_7">Pad</A></FONT>                      : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A>;
1291       <FONT COLOR=red><A NAME="ref_1286_7" HREF="terminal_interface-curses__adb.htm#ref_1470_7">Source_Top_Row</A></FONT>           : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
1292       <FONT COLOR=red><A NAME="ref_1287_7" HREF="terminal_interface-curses__adb.htm#ref_1471_7">Source_Left_Column</A></FONT>       : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Column_Position</A>;
1293       <FONT COLOR=red><A NAME="ref_1288_7" HREF="terminal_interface-curses__adb.htm#ref_1472_7">Destination_Top_Row</A></FONT>      : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
1294       <FONT COLOR=red><A NAME="ref_1289_7" HREF="terminal_interface-curses__adb.htm#ref_1473_7">Destination_Left_Column</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Column_Position</A>;
1295       <FONT COLOR=red><A NAME="ref_1290_7" HREF="terminal_interface-curses__adb.htm#ref_1474_7">Destination_Bottom_Row</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
1296       Destination_Right_Column : <b>in</b> Column_Position);
1297    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_pad.3x.html">prefresh()</A></EM></FONT>
1298    <b>pragma</b> Inline (Refresh);
1299
1300    <FONT COLOR=green><EM>--  #1A NAME="AFU_92"#2|</EM></FONT>
1301    <b>procedure</b> Refresh_Without_Update
1302      (<FONT COLOR=red><A NAME="ref_1297_7" HREF="terminal_interface-curses__adb.htm#ref_1499_7">Pad</A></FONT>                      : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A>;
1303       <FONT COLOR=red><A NAME="ref_1298_7" HREF="terminal_interface-curses__adb.htm#ref_1500_7">Source_Top_Row</A></FONT>           : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
1304       <FONT COLOR=red><A NAME="ref_1299_7" HREF="terminal_interface-curses__adb.htm#ref_1501_7">Source_Left_Column</A></FONT>       : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Column_Position</A>;
1305       <FONT COLOR=red><A NAME="ref_1300_7" HREF="terminal_interface-curses__adb.htm#ref_1502_7">Destination_Top_Row</A></FONT>      : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
1306       <FONT COLOR=red><A NAME="ref_1301_7" HREF="terminal_interface-curses__adb.htm#ref_1503_7">Destination_Left_Column</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Column_Position</A>;
1307       <FONT COLOR=red><A NAME="ref_1302_7" HREF="terminal_interface-curses__adb.htm#ref_1504_7">Destination_Bottom_Row</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
1308       Destination_Right_Column : <b>in</b> Column_Position);
1309    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_pad.3x.html">pnoutrefresh()</A></EM></FONT>
1310    <b>pragma</b> Inline (Refresh_Without_Update);
1311
1312    <FONT COLOR=green><EM>--  #1A NAME="AFU_93"#2|</EM></FONT>
1313    <b>procedure</b> Add_Character_To_Pad_And_Echo_It
1314      (<FONT COLOR=red><A NAME="ref_1309_7" HREF="terminal_interface-curses__adb.htm#ref_1529_7">Pad</A></FONT> : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Window</A>;
1315       Ch  : <b>in</b> Attributed_Character);
1316    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_pad.3x.html">pechochar()</A></EM></FONT>
1317
1318    <b>procedure</b> Add_Character_To_Pad_And_Echo_It
1319      (<FONT COLOR=red><A NAME="ref_1314_7" HREF="terminal_interface-curses__adb.htm#ref_1542_7">Pad</A></FONT> : <b>in</b> Window;
1320       Ch  : <b>in</b> Character);
1321    <b>pragma</b> Inline (Add_Character_To_Pad_And_Echo_It);
1322
1323    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1324    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_scroll.3x.html">curs_scroll.3x</A></EM></FONT>
1325    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1326
1327    <FONT COLOR=green><EM>--  #1A NAME="AFU_94"#2|</EM></FONT>
1328    <b>procedure</b> Scroll (<FONT COLOR=red><A NAME="ref_1323_22" HREF="terminal_interface-curses__adb.htm#ref_1553_22">Win</A></FONT>    : <b>in</b> Window  := Standard_Window;
1329                      Amount : <b>in</b> Integer := 1);
1330    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_scroll.3x.html">wscrl()</A></EM></FONT>
1331    <FONT COLOR=green><EM>--  AKA: scroll()</EM></FONT>
1332    <FONT COLOR=green><EM>--  AKA: scrl()</EM></FONT>
1333    <b>pragma</b> Inline (Scroll);
1334
1335    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1336    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_delch.3x.html">curs_delch.3x</A></EM></FONT>
1337    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1338
1339    <FONT COLOR=green><EM>--  #1A NAME="AFU_95"#2|</EM></FONT>
1340    <b>procedure</b> Delete_Character (Win : <b>in</b> Window := Standard_Window);
1341    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_delch.3x.html">wdelch()</A></EM></FONT>
1342    <FONT COLOR=green><EM>--  AKA: delch()</EM></FONT>
1343
1344    <FONT COLOR=green><EM>--  #1A NAME="AFU_96"#2|</EM></FONT>
1345    <b>procedure</b> Delete_Character
1346      (<FONT COLOR=red><A NAME="ref_1341_7" HREF="terminal_interface-curses__adb.htm#ref_1577_7">Win</A></FONT>    : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;
1347       <FONT COLOR=red><A NAME="ref_1342_7" HREF="terminal_interface-curses__adb.htm#ref_1578_7">Line</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
1348       Column : <b>in</b> Column_Position);
1349    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_delch.3x.html">mvwdelch()</A></EM></FONT>
1350    <FONT COLOR=green><EM>--  AKA: mvdelch()</EM></FONT>
1351    <b>pragma</b> Inline (Delete_Character);
1352
1353    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1354    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_inch.3x.html">curs_inch.3x</A></EM></FONT>
1355    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1356
1357    <FONT COLOR=green><EM>--  #1A NAME="AFU_97"#2|</EM></FONT>
1358    <b>function</b> <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Peek</A> (Win : Window := Standard_Window)
1359      <b>return</b> Attributed_Character;
1360    <FONT COLOR=green><EM>--  AKA: inch()</EM></FONT>
1361    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_inch.3x.html">winch()</A></EM></FONT>
1362
1363    <FONT COLOR=green><EM>--  #1A NAME="AFU_98"#2|</EM></FONT>
1364    <b>function</b> Peek
1365      (<FONT COLOR=red><A NAME="ref_1360_7" HREF="terminal_interface-curses__adb.htm#ref_1601_7">Win</A></FONT>    : <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;
1366       <FONT COLOR=red><A NAME="ref_1361_7" HREF="terminal_interface-curses__adb.htm#ref_1602_7">Line</A></FONT>   : <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
1367       Column : Column_Position) <b>return</b> Attributed_Character;
1368    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_inch.3x.html">mvwinch()</A></EM></FONT>
1369    <FONT COLOR=green><EM>--  AKA: mvinch()</EM></FONT>
1370    <FONT COLOR=green><EM>--  More Peek's follow, pragma Inline appears later.</EM></FONT>
1371
1372    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1373    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_insch.3x.html">curs_insch.3x</A></EM></FONT>
1374    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1375
1376    <FONT COLOR=green><EM>--  #1A NAME="AFU_99"#2|</EM></FONT>
1377    <b>procedure</b> Insert (<FONT COLOR=red><A NAME="ref_1372_22" HREF="terminal_interface-curses__adb.htm#ref_1613_22">Win</A></FONT> : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Window</A> := Standard_Window;
1378                      Ch  : <b>in</b> Attributed_Character);
1379    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_insch.3x.html">winsch()</A></EM></FONT>
1380    <FONT COLOR=green><EM>--  AKA: insch()</EM></FONT>
1381
1382    <FONT COLOR=green><EM>--  #1A NAME="AFU_100"#2|</EM></FONT>
1383    <b>procedure</b> Insert (<FONT COLOR=red><A NAME="ref_1378_22" HREF="terminal_interface-curses__adb.htm#ref_1625_7">Win</A></FONT>    : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;
1384                      <FONT COLOR=red><A NAME="ref_1379_22" HREF="terminal_interface-curses__adb.htm#ref_1626_7">Line</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
1385                      <FONT COLOR=red><A NAME="ref_1380_22" HREF="terminal_interface-curses__adb.htm#ref_1627_7">Column</A></FONT> : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Column_Position</A>;
1386                      Ch     : <b>in</b> Attributed_Character);
1387    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_insch.3x.html">mvwinsch()</A></EM></FONT>
1388    <FONT COLOR=green><EM>--  AKA: mvinsch()</EM></FONT>
1389
1390    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1391    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_insstr.3x.html">curs_insstr.3x</A></EM></FONT>
1392    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1393
1394    <FONT COLOR=green><EM>--  #1A NAME="AFU_101"#2|</EM></FONT>
1395    <b>procedure</b> Insert (<FONT COLOR=red><A NAME="ref_1390_22" HREF="terminal_interface-curses__adb.htm#ref_1644_22">Win</A></FONT> : <b>in</b> Window := Standard_Window;
1396                      <FONT COLOR=red><A NAME="ref_1391_22" HREF="terminal_interface-curses__adb.htm#ref_1645_22">Str</A></FONT> : <b>in</b> String;
1397                      Len : <b>in</b> Integer := -1);
1398    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_insstr.3x.html">winsnstr()</A></EM></FONT>
1399    <FONT COLOR=green><EM>--  AKA: winsstr()</EM></FONT>
1400    <FONT COLOR=green><EM>--  AKA: insnstr()</EM></FONT>
1401    <FONT COLOR=green><EM>--  AKA: insstr()</EM></FONT>
1402
1403    <FONT COLOR=green><EM>--  #1A NAME="AFU_102"#2|</EM></FONT>
1404    <b>procedure</b> Insert (<FONT COLOR=red><A NAME="ref_1399_22" HREF="terminal_interface-curses__adb.htm#ref_1663_7">Win</A></FONT>    : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;
1405                      <FONT COLOR=red><A NAME="ref_1400_22" HREF="terminal_interface-curses__adb.htm#ref_1664_7">Line</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
1406                      <FONT COLOR=red><A NAME="ref_1401_22" HREF="terminal_interface-curses__adb.htm#ref_1665_7">Column</A></FONT> : <b>in</b> Column_Position;
1407                      <FONT COLOR=red><A NAME="ref_1402_22" HREF="terminal_interface-curses__adb.htm#ref_1666_7">Str</A></FONT>    : <b>in</b> String;
1408                      Len    : <b>in</b> Integer := -1);
1409    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_insstr.3x.html">mvwinsnstr()</A></EM></FONT>
1410    <FONT COLOR=green><EM>--  AKA: mvwinsstr()</EM></FONT>
1411    <FONT COLOR=green><EM>--  AKA: mvinsnstr()</EM></FONT>
1412    <FONT COLOR=green><EM>--  AKA: mvinsstr()</EM></FONT>
1413    <b>pragma</b> Inline (Insert);
1414
1415    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1416    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_instr.3x.html">curs_instr.3x</A></EM></FONT>
1417    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1418
1419    <FONT COLOR=green><EM>--  #1A NAME="AFU_103"#2|</EM></FONT>
1420    <b>procedure</b> Peek (<FONT COLOR=red><A NAME="ref_1415_20" HREF="terminal_interface-curses__adb.htm#ref_1686_20">Win</A></FONT> : <b>in</b>  Window := Standard_Window;
1421                    <FONT COLOR=red><A NAME="ref_1416_20" HREF="terminal_interface-curses__adb.htm#ref_1687_20">Str</A></FONT> : <b>out</b> String;
1422                    Len : <b>in</b>  Integer := -1);
1423    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_instr.3x.html">winnstr()</A></EM></FONT>
1424    <FONT COLOR=green><EM>--  AKA: winstr()</EM></FONT>
1425    <FONT COLOR=green><EM>--  AKA: innstr()</EM></FONT>
1426    <FONT COLOR=green><EM>--  AKA: instr()</EM></FONT>
1427
1428    <FONT COLOR=green><EM>--  #1A NAME="AFU_104"#2|</EM></FONT>
1429    <b>procedure</b> Peek (<FONT COLOR=red><A NAME="ref_1424_20" HREF="terminal_interface-curses__adb.htm#ref_1716_7">Win</A></FONT>    : <b>in</b>  <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;
1430                    <FONT COLOR=red><A NAME="ref_1425_20" HREF="terminal_interface-curses__adb.htm#ref_1717_7">Line</A></FONT>   : <b>in</b>  <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
1431                    <FONT COLOR=red><A NAME="ref_1426_20" HREF="terminal_interface-curses__adb.htm#ref_1718_7">Column</A></FONT> : <b>in</b>  Column_Position;
1432                    <FONT COLOR=red><A NAME="ref_1427_20" HREF="terminal_interface-curses__adb.htm#ref_1719_7">Str</A></FONT>    : <b>out</b> String;
1433                    Len    : <b>in</b>  Integer := -1);
1434    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_instr.3x.html">mvwinnstr()</A></EM></FONT>
1435    <FONT COLOR=green><EM>--  AKA: mvwinstr()</EM></FONT>
1436    <FONT COLOR=green><EM>--  AKA: mvinnstr()</EM></FONT>
1437    <FONT COLOR=green><EM>--  AKA: mvinstr()</EM></FONT>
1438
1439    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1440    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_inchstr.3x.html">curs_inchstr.3x</A></EM></FONT>
1441    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1442
1443    <FONT COLOR=green><EM>--  #1A NAME="AFU_105"#2|</EM></FONT>
1444    <b>procedure</b> Peek (<FONT COLOR=red><A NAME="ref_1439_20" HREF="terminal_interface-curses__adb.htm#ref_1728_7">Win</A></FONT> : <b>in</b>  <A HREF="terminal_interface-curses__ads.htm#ref_376_9">Window</A> := Standard_Window;
1445                    <FONT COLOR=red><A NAME="ref_1440_20" HREF="terminal_interface-curses__adb.htm#ref_1729_7">Str</A></FONT> : <b>out</b> Attributed_String;
1446                    Len : <b>in</b>  Integer := -1);
1447    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_inchstr.3x.html">winchnstr()</A></EM></FONT>
1448    <FONT COLOR=green><EM>--  AKA: winchstr()</EM></FONT>
1449    <FONT COLOR=green><EM>--  AKA: inchnstr()</EM></FONT>
1450    <FONT COLOR=green><EM>--  AKA: inchstr()</EM></FONT>
1451
1452    <FONT COLOR=green><EM>--  #1A NAME="AFU_106"#2|</EM></FONT>
1453    <b>procedure</b> Peek (<FONT COLOR=red><A NAME="ref_1448_20" HREF="terminal_interface-curses__adb.htm#ref_1765_7">Win</A></FONT>    : <b>in</b>  <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;
1454                    <FONT COLOR=red><A NAME="ref_1449_20" HREF="terminal_interface-curses__adb.htm#ref_1766_7">Line</A></FONT>   : <b>in</b>  <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
1455                    <FONT COLOR=red><A NAME="ref_1450_20" HREF="terminal_interface-curses__adb.htm#ref_1767_7">Column</A></FONT> : <b>in</b>  <A HREF="terminal_interface-curses__ads.htm#ref_376_9">Column_Position</A>;
1456                    <FONT COLOR=red><A NAME="ref_1451_20" HREF="terminal_interface-curses__adb.htm#ref_1768_7">Str</A></FONT>    : <b>out</b> Attributed_String;
1457                    Len    : <b>in</b>  Integer := -1);
1458    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_inchstr.3x.html">mvwinchnstr()</A></EM></FONT>
1459    <FONT COLOR=green><EM>--  AKA: mvwinchstr()</EM></FONT>
1460    <FONT COLOR=green><EM>--  AKA: mvinchnstr()</EM></FONT>
1461    <FONT COLOR=green><EM>--  AKA: mvinchstr()</EM></FONT>
1462    <FONT COLOR=green><EM>--  We don't inline the Peek procedures</EM></FONT>
1463
1464    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1465    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_getstr.3x.html">curs_getstr.3x</A></EM></FONT>
1466    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1467
1468    <FONT COLOR=green><EM>--  #1A NAME="AFU_107"#2|</EM></FONT>
1469    <b>procedure</b> Get (<FONT COLOR=red><A NAME="ref_1464_19" HREF="terminal_interface-curses__adb.htm#ref_1776_19">Win</A></FONT> : <b>in</b>  Window := Standard_Window;
1470                   <FONT COLOR=red><A NAME="ref_1465_19" HREF="terminal_interface-curses__adb.htm#ref_1777_19">Str</A></FONT> : <b>out</b> String;
1471                   Len : <b>in</b>  Integer := -1);
1472    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_getstr.3x.html">wgetnstr()</A></EM></FONT>
1473    <FONT COLOR=green><EM>--  AKA: wgetstr()</EM></FONT>
1474    <FONT COLOR=green><EM>--  AKA: getnstr()</EM></FONT>
1475    <FONT COLOR=green><EM>--  AKA: getstr()</EM></FONT>
1476    <FONT COLOR=green><EM>--  actually getstr is not supported because that results in buffer</EM></FONT>
1477    <FONT COLOR=green><EM>--  overflows.</EM></FONT>
1478
1479    <FONT COLOR=green><EM>--  #1A NAME="AFU_108"#2|</EM></FONT>
1480    <b>procedure</b> Get (<FONT COLOR=red><A NAME="ref_1475_19" HREF="terminal_interface-curses__adb.htm#ref_1806_7">Win</A></FONT>    : <b>in</b>  <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;
1481                   <FONT COLOR=red><A NAME="ref_1476_19" HREF="terminal_interface-curses__adb.htm#ref_1807_7">Line</A></FONT>   : <b>in</b>  <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
1482                   <FONT COLOR=red><A NAME="ref_1477_19" HREF="terminal_interface-curses__adb.htm#ref_1808_7">Column</A></FONT> : <b>in</b>  Column_Position;
1483                   <FONT COLOR=red><A NAME="ref_1478_19" HREF="terminal_interface-curses__adb.htm#ref_1809_7">Str</A></FONT>    : <b>out</b> String;
1484                   Len    : <b>in</b>  Integer := -1);
1485    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_getstr.3x.html">mvwgetnstr()</A></EM></FONT>
1486    <FONT COLOR=green><EM>--  AKA: mvwgetstr()</EM></FONT>
1487    <FONT COLOR=green><EM>--  AKA: mvgetnstr()</EM></FONT>
1488    <FONT COLOR=green><EM>--  AKA: mvgetstr()</EM></FONT>
1489    <FONT COLOR=green><EM>--  Get is not inlined</EM></FONT>
1490
1491    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1492    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_slk.3x.html">curs_slk.3x</A></EM></FONT>
1493    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1494
1495    <FONT COLOR=green><EM>--  Not Implemented: slk_attr_on, slk_attr_off, slk_attr_set</EM></FONT>
1496
1497    <b>type</b> Soft_Label_Key_Format <b>is</b> (<FONT COLOR=red><A NAME="ref_1492_35">Three_Two_Three</A></FONT>,
1498                                   <FONT COLOR=red><A NAME="ref_1493_35">Four_Four</A></FONT>,
1499                                   <FONT COLOR=red><A NAME="ref_1494_35">PC_Style</A></FONT>,              <FONT COLOR=green><EM>--  ncurses specific</EM></FONT>
1500         <FONT COLOR=red><A NAME="ref_1495_9"> </A></FONT>                         PC_Style_With_Index);  <FONT COLOR=green><EM>--  "</EM></FONT>
1501    <b>type</b> <FONT COLOR=red><A NAME="ref_1496_9">Label_Number</A></FONT> <b>is</b> <b>new</b> Positive <b>range</b> 1 .. <FONT COLOR=red><A NAME="ref_1496_49">12</A></FONT>;
1502    <b>type</b> Label_Justification <b>is</b> (Left, Centered, Right);
1503
1504    <FONT COLOR=green><EM>--  #1A NAME="AFU_109"#2|</EM></FONT>
1505    <b>procedure</b> Init_Soft_Label_Keys
1506      (Format : <b>in</b> Soft_Label_Key_Format := Three_Two_Three);
1507    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_slk.3x.html">slk_init()</A></EM></FONT>
1508    <b>pragma</b> Inline (Init_Soft_Label_Keys);
1509
1510    <FONT COLOR=green><EM>--  #1A NAME="AFU_110"#2|</EM></FONT>
1511    <b>procedure</b> Set_Soft_Label_Key (<FONT COLOR=red><A NAME="ref_1506_34" HREF="terminal_interface-curses__adb.htm#ref_1828_34">Label</A></FONT> : <b>in</b> Label_Number;
1512                                  <FONT COLOR=red><A NAME="ref_1507_34" HREF="terminal_interface-curses__adb.htm#ref_1829_34">Text</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_1496_9">String</A>;
1513                                  Fmt   : <b>in</b> Label_Justification := Left);
1514    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_slk.3x.html">slk_set()</A></EM></FONT>
1515    <FONT COLOR=green><EM>--  We don't inline this procedure</EM></FONT>
1516
1517    <FONT COLOR=green><EM>--  #1A NAME="AFU_111"#2|</EM></FONT>
1518    <b>procedure</b> Refresh_Soft_Label_Keys;
1519    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_slk.3x.html">slk_refresh()</A></EM></FONT>
1520    <b>pragma</b> Inline (Refresh_Soft_Label_Keys);
1521
1522    <FONT COLOR=green><EM>--  #1A NAME="AFU_112"#2|</EM></FONT>
1523    <b>procedure</b> Refresh_Soft_Label_Keys_Without_Update;
1524    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_slk.3x.html">slk_noutrefresh()</A></EM></FONT>
1525    <b>pragma</b> Inline (Refresh_Soft_Label_Keys_Without_Update);
1526
1527    <FONT COLOR=green><EM>--  #1A NAME="AFU_113"#2|</EM></FONT>
1528    <b>procedure</b> Get_Soft_Label_Key (<FONT COLOR=red><A NAME="ref_1523_34" HREF="terminal_interface-curses__adb.htm#ref_1867_34">Label</A></FONT> : <b>in</b> Label_Number;
1529                                  Text  : <b>out</b> String);
1530    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_slk.3x.html">slk_label()</A></EM></FONT>
1531
1532    <FONT COLOR=green><EM>--  #1A NAME="AFU_114"#2|</EM></FONT>
1533    <b>function</b> Get_Soft_Label_Key (Label : <b>in</b> Label_Number) <b>return</b> String;
1534    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_slk.3x.html">slk_label()</A></EM></FONT>
1535    <FONT COLOR=green><EM>--  Same as function</EM></FONT>
1536    <b>pragma</b> Inline (Get_Soft_Label_Key);
1537
1538    <FONT COLOR=green><EM>--  #1A NAME="AFU_115"#2|</EM></FONT>
1539    <b>procedure</b> Clear_Soft_Label_Keys;
1540    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_slk.3x.html">slk_clear()</A></EM></FONT>
1541    <b>pragma</b> Inline (Clear_Soft_Label_Keys);
1542
1543    <FONT COLOR=green><EM>--  #1A NAME="AFU_116"#2|</EM></FONT>
1544    <b>procedure</b> Restore_Soft_Label_Keys;
1545    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_slk.3x.html">slk_restore()</A></EM></FONT>
1546    <b>pragma</b> Inline (Restore_Soft_Label_Keys);
1547
1548    <FONT COLOR=green><EM>--  #1A NAME="AFU_117"#2|</EM></FONT>
1549    <b>procedure</b> Touch_Soft_Label_Keys;
1550    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_slk.3x.html">slk_touch()</A></EM></FONT>
1551    <b>pragma</b> Inline (Touch_Soft_Label_Keys);
1552
1553    <FONT COLOR=green><EM>--  #1A NAME="AFU_118"#2|</EM></FONT>
1554    <b>procedure</b> Switch_Soft_Label_Key_Attributes
1555      (<FONT COLOR=red><A NAME="ref_1550_7" HREF="terminal_interface-curses__adb.htm#ref_1915_7">Attr</A></FONT> : <b>in</b> Character_Attribute_Set;
1556       On   : <b>in</b> Boolean := True);
1557    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_slk.3x.html">slk_attron()</A></EM></FONT>
1558    <FONT COLOR=green><EM>--  AKA: slk_attroff()</EM></FONT>
1559    <b>pragma</b> Inline (Switch_Soft_Label_Key_Attributes);
1560
1561    <FONT COLOR=green><EM>--  #1A NAME="AFU_119"#2|</EM></FONT>
1562    <b>procedure</b> Set_Soft_Label_Key_Attributes
1563      (<FONT COLOR=red><A NAME="ref_1558_7" HREF="terminal_interface-curses__adb.htm#ref_1939_7">Attr</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Character_Attribute_Set</A> := Normal_Video;
1564       Color : <b>in</b> Color_Pair := Color_Pair'First);
1565    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_slk.3x.html">slk_attrset()</A></EM></FONT>
1566    <b>pragma</b> Inline (Set_Soft_Label_Key_Attributes);
1567
1568    <FONT COLOR=green><EM>--  #1A NAME="AFU_120"#2|</EM></FONT>
1569    <b>function</b> Get_Soft_Label_Key_Attributes <b>return</b> Character_Attribute_Set;
1570    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_slk.3x.html">slk_attr()</A></EM></FONT>
1571
1572    <FONT COLOR=green><EM>--  #1A NAME="AFU_121"#2|</EM></FONT>
1573    <b>function</b> Get_Soft_Label_Key_Attributes <b>return</b> Color_Pair;
1574    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_slk.3x.html">slk_attr()</A></EM></FONT>
1575    <b>pragma</b> Inline (Get_Soft_Label_Key_Attributes);
1576
1577    <FONT COLOR=green><EM>--  #1A NAME="AFU_122"#2|</EM></FONT>
1578    <b>procedure</b> Set_Soft_Label_Key_Color (Pair : <b>in</b> Color_Pair);
1579    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_slk.3x.html">slk_color()</A></EM></FONT>
1580    <b>pragma</b> Inline (Set_Soft_Label_Key_Color);
1581
1582    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1583    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/keybound.3x.html">keybound.3x</A></EM></FONT>
1584    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1585    <FONT COLOR=green><EM>--  Not Implemented: keybound</EM></FONT>
1586
1587    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1588    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/keyok.3x.html">keyok.3x</A></EM></FONT>
1589    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1590
1591    <FONT COLOR=green><EM>--  #1A NAME="AFU_123"#2|</EM></FONT>
1592    <b>procedure</b> Enable_Key (<FONT COLOR=red><A NAME="ref_1587_26" HREF="terminal_interface-curses__adb.htm#ref_1985_26">Key</A></FONT>    : <b>in</b> Special_Key_Code;
1593                          Enable : <b>in</b> Boolean := True);
1594    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/keyok.3x.html">keyok()</A></EM></FONT>
1595    <b>pragma</b> Inline (Enable_Key);
1596
1597    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1598    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/define_key.3x.html">define_key.3x</A></EM></FONT>
1599    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1600
1601    <FONT COLOR=green><EM>--  #1A NAME="AFU_124"#2|</EM></FONT>
1602    <b>procedure</b> Define_Key (<FONT COLOR=red><A NAME="ref_1597_26" HREF="terminal_interface-curses__adb.htm#ref_1998_26">Definition</A></FONT> : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_78_12">String</A>;
1603                          Key        : <b>in</b> Special_Key_Code);
1604    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/define_key.3x.html">define_key()</A></EM></FONT>
1605    <b>pragma</b> Inline (Define_Key);
1606
1607    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1608    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_util.3x.html">curs_util.3x</A></EM></FONT>
1609    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1610
1611    <FONT COLOR=green><EM>--  | Not implemented : filter, use_env</EM></FONT>
1612    <FONT COLOR=green><EM>--  | putwin, getwin are in the child package PutWin</EM></FONT>
1613    <FONT COLOR=green><EM>--</EM></FONT>
1614
1615    <FONT COLOR=green><EM>--  #1A NAME="AFU_125"#2|</EM></FONT>
1616    <b>procedure</b> Key_Name (<FONT COLOR=red><A NAME="ref_1611_24" HREF="terminal_interface-curses__adb.htm#ref_91_24">Key</A></FONT>  : <b>in</b>  Real_Key_Code;
1617                        Name : <b>out</b> String);
1618    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_util.3x.html">keyname()</A></EM></FONT>
1619    <FONT COLOR=green><EM>--  The external name for a real keystroke.</EM></FONT>
1620
1621    <FONT COLOR=green><EM>--  #1A NAME="AFU_126"#2|</EM></FONT>
1622    <b>function</b> Key_Name (Key  : <b>in</b>  Real_Key_Code) <b>return</b> String;
1623    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_util.3x.html">keyname()</A></EM></FONT>
1624    <FONT COLOR=green><EM>--  Same as function</EM></FONT>
1625    <FONT COLOR=green><EM>--  We don't inline this routine</EM></FONT>
1626
1627    <FONT COLOR=green><EM>--  #1A NAME="AFU_127"#2|</EM></FONT>
1628    <b>procedure</b> Un_Control (<FONT COLOR=red><A NAME="ref_1623_26" HREF="terminal_interface-curses__adb.htm#ref_2014_26">Ch</A></FONT>  : <b>in</b> Attributed_Character;
1629                          Str : <b>out</b> String);
1630    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_util.3x.html">unctrl()</A></EM></FONT>
1631
1632    <FONT COLOR=green><EM>--  #1A NAME="AFU_128"#2|</EM></FONT>
1633    <b>function</b> Un_Control (Ch  : <b>in</b> Attributed_Character) <b>return</b> String;
1634    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_util.3x.html">unctrl()</A></EM></FONT>
1635    <FONT COLOR=green><EM>--  Same as function</EM></FONT>
1636    <b>pragma</b> Inline (Un_Control);
1637
1638    <FONT COLOR=green><EM>--  #1A NAME="AFU_129"#2|</EM></FONT>
1639    <b>procedure</b> Delay_Output (Msecs : <b>in</b> Natural);
1640    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_util.3x.html">delay_output()</A></EM></FONT>
1641    <b>pragma</b> Inline (Delay_Output);
1642
1643    <FONT COLOR=green><EM>--  #1A NAME="AFU_130"#2|</EM></FONT>
1644    <b>procedure</b> Flush_Input;
1645    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_util.3x.html">flushinp()</A></EM></FONT>
1646    <b>pragma</b> Inline (Flush_Input);
1647
1648    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1649    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_termattrs.3x.html">curs_termattrs.3x</A></EM></FONT>
1650    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1651
1652    <FONT COLOR=green><EM>--  #1A NAME="AFU_131"#2|</EM></FONT>
1653    <b>function</b> Baudrate <b>return</b> Natural;
1654    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_termattrs.3x.html">baudrate()</A></EM></FONT>
1655    <b>pragma</b> Inline (Baudrate);
1656
1657    <FONT COLOR=green><EM>--  #1A NAME="AFU_132"#2|</EM></FONT>
1658    <b>function</b> Erase_Character <b>return</b> Character;
1659    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_termattrs.3x.html">erasechar()</A></EM></FONT>
1660    <b>pragma</b> Inline (Erase_Character);
1661
1662    <FONT COLOR=green><EM>--  #1A NAME="AFU_133"#2|</EM></FONT>
1663    <b>function</b> Kill_Character <b>return</b> Character;
1664    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_termattrs.3x.html">killchar()</A></EM></FONT>
1665    <b>pragma</b> Inline (Kill_Character);
1666
1667    <FONT COLOR=green><EM>--  #1A NAME="AFU_134"#2|</EM></FONT>
1668    <b>function</b> Has_Insert_Character <b>return</b> Boolean;
1669    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_termattrs.3x.html">has_ic()</A></EM></FONT>
1670    <b>pragma</b> Inline (Has_Insert_Character);
1671
1672    <FONT COLOR=green><EM>--  #1A NAME="AFU_135"#2|</EM></FONT>
1673    <b>function</b> Has_Insert_Line <b>return</b> Boolean;
1674    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_termattrs.3x.html">has_il()</A></EM></FONT>
1675    <b>pragma</b> Inline (Has_Insert_Line);
1676
1677    <FONT COLOR=green><EM>--  #1A NAME="AFU_136"#2|</EM></FONT>
1678    <b>function</b> Supported_Attributes <b>return</b> Character_Attribute_Set;
1679    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_termattrs.3x.html">termattrs()</A></EM></FONT>
1680    <b>pragma</b> Inline (Supported_Attributes);
1681
1682    <FONT COLOR=green><EM>--  #1A NAME="AFU_137"#2|</EM></FONT>
1683    <b>procedure</b> Long_Name (Name : <b>out</b> String);
1684    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_termattrs.3x.html">longname()</A></EM></FONT>
1685
1686    <FONT COLOR=green><EM>--  #1A NAME="AFU_138"#2|</EM></FONT>
1687    <b>function</b> Long_Name <b>return</b> String;
1688    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_termattrs.3x.html">longname()</A></EM></FONT>
1689    <FONT COLOR=green><EM>--  Same as function</EM></FONT>
1690    <b>pragma</b> Inline (Long_Name);
1691
1692    <FONT COLOR=green><EM>--  #1A NAME="AFU_139"#2|</EM></FONT>
1693    <b>procedure</b> Terminal_Name (Name : <b>out</b> String);
1694    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_termattrs.3x.html">termname()</A></EM></FONT>
1695
1696    <FONT COLOR=green><EM>--  #1A NAME="AFU_140"#2|</EM></FONT>
1697    <b>function</b> Terminal_Name <b>return</b> String;
1698    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_termattrs.3x.html">termname()</A></EM></FONT>
1699    <FONT COLOR=green><EM>--  Same as function</EM></FONT>
1700    <b>pragma</b> Inline (Terminal_Name);
1701
1702    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1703    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_color.3x.html">curs_color.3x</A></EM></FONT>
1704    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1705
1706    <FONT COLOR=green><EM>--  COLOR_PAIR</EM></FONT>
1707    <FONT COLOR=green><EM>--  COLOR_PAIR(n) in C is the same as</EM></FONT>
1708    <FONT COLOR=green><EM>--  Attributed_Character(Ch =&gt; Nul, Color =&gt; n, Attr =&gt; Normal_Video)</EM></FONT>
1709    <FONT COLOR=green><EM>--  In C you often see something like c = c | COLOR_PAIR(n);</EM></FONT>
1710    <FONT COLOR=green><EM>--  This is equivalent to c.Color := n;</EM></FONT>
1711
1712    <FONT COLOR=green><EM>--  #1A NAME="AFU_141"#2|</EM></FONT>
1713    <b>procedure</b> Start_Color;
1714    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_color.3x.html">start_color()</A></EM></FONT>
1715    <b>pragma</b> Import (C, Start_Color, "start_color");
1716
1717    <FONT COLOR=green><EM>--  #1A NAME="AFU_142"#2|</EM></FONT>
1718    <b>procedure</b> Init_Pair (<FONT COLOR=red><A NAME="ref_1713_25" HREF="terminal_interface-curses__adb.htm#ref_2141_25">Pair</A></FONT> : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Redefinable_Color_Pair</A>;
1719                         <FONT COLOR=red><A NAME="ref_1714_25" HREF="terminal_interface-curses__adb.htm#ref_2142_25">Fore</A></FONT> : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A>;
1720                         Back : <b>in</b> Color_Number);
1721    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_color.3x.html">init_pair()</A></EM></FONT>
1722    <b>pragma</b> Inline (Init_Pair);
1723
1724    <FONT COLOR=green><EM>--  #1A NAME="AFU_143"#2|</EM></FONT>
1725    <b>procedure</b> Pair_Content (<FONT COLOR=red><A NAME="ref_1720_28" HREF="terminal_interface-curses__adb.htm#ref_2162_28">Pair</A></FONT> : <b>in</b> Color_Pair;
1726                            <FONT COLOR=red><A NAME="ref_1721_28" HREF="terminal_interface-curses__adb.htm#ref_2163_28">Fore</A></FONT> : <b>out</b> <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A>;
1727                            Back : <b>out</b> Color_Number);
1728    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_color.3x.html">pair_content()</A></EM></FONT>
1729    <b>pragma</b> Inline (Pair_Content);
1730
1731    <FONT COLOR=green><EM>--  #1A NAME="AFU_144"#2|</EM></FONT>
1732    <b>function</b> Has_Colors <b>return</b> Boolean;
1733    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_color.3x.html">has_colors()</A></EM></FONT>
1734    <b>pragma</b> Inline (Has_Colors);
1735
1736    <FONT COLOR=green><EM>--  #1A NAME="AFU_145"#2|</EM></FONT>
1737    <b>procedure</b> Init_Color (<FONT COLOR=red><A NAME="ref_1732_26" HREF="terminal_interface-curses__adb.htm#ref_2194_26">Color</A></FONT> : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_295_9">Color_Number</A>;
1738                          <FONT COLOR=red><A NAME="ref_1733_26" HREF="terminal_interface-curses__adb.htm#ref_2195_26">Red</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_295_9">RGB_Value</A>;
1739                          <FONT COLOR=red><A NAME="ref_1734_26" HREF="terminal_interface-curses__adb.htm#ref_2196_26">Green</A></FONT> : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_295_9">RGB_Value</A>;
1740                          Blue  : <b>in</b> RGB_Value);
1741    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_color.3x.html">init_color()</A></EM></FONT>
1742    <b>pragma</b> Inline (Init_Color);
1743
1744    <FONT COLOR=green><EM>--  #1A NAME="AFU_146"#2|</EM></FONT>
1745    <b>function</b> Can_Change_Color <b>return</b> Boolean;
1746    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_color.3x.html">can_change_color()</A></EM></FONT>
1747    <b>pragma</b> Inline (Can_Change_Color);
1748
1749    <FONT COLOR=green><EM>--  #1A NAME="AFU_147"#2|</EM></FONT>
1750    <b>procedure</b> Color_Content (<FONT COLOR=red><A NAME="ref_1745_29" HREF="terminal_interface-curses__adb.htm#ref_2223_29">Color</A></FONT> : <b>in</b>  <A HREF="terminal_interface-curses__ads.htm#ref_295_9">Color_Number</A>;
1751                             <FONT COLOR=red><A NAME="ref_1746_29" HREF="terminal_interface-curses__adb.htm#ref_2224_29">Red</A></FONT>   : <b>out</b> <A HREF="terminal_interface-curses__ads.htm#ref_295_9">RGB_Value</A>;
1752                             <FONT COLOR=red><A NAME="ref_1747_29" HREF="terminal_interface-curses__adb.htm#ref_2225_29">Green</A></FONT> : <b>out</b> <A HREF="terminal_interface-curses__ads.htm#ref_295_9">RGB_Value</A>;
1753                             Blue  : <b>out</b> RGB_Value);
1754    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_color.3x.html">color_content()</A></EM></FONT>
1755    <b>pragma</b> Inline (Color_Content);
1756
1757    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1758    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_kernel.3x.html">curs_kernel.3x</A></EM></FONT>
1759    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1760    <FONT COLOR=green><EM>--  | Not implemented: getsyx, setsyx</EM></FONT>
1761    <FONT COLOR=green><EM>--</EM></FONT>
1762    <b>type</b> Curses_Mode <b>is</b> (Curses, Shell);
1763
1764    <FONT COLOR=green><EM>--  #1A NAME="AFU_148"#2|</EM></FONT>
1765    <b>procedure</b> Save_Curses_Mode (Mode : <b>in</b> Curses_Mode);
1766    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_kernel.3x.html">def_prog_mode()</A></EM></FONT>
1767    <FONT COLOR=green><EM>--  AKA: def_shell_mode()</EM></FONT>
1768    <b>pragma</b> Inline (Save_Curses_Mode);
1769
1770    <FONT COLOR=green><EM>--  #1A NAME="AFU_149"#2|</EM></FONT>
1771    <b>procedure</b> Reset_Curses_Mode (Mode : <b>in</b> Curses_Mode);
1772    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_kernel.3x.html">reset_prog_mode()</A></EM></FONT>
1773    <FONT COLOR=green><EM>--  AKA: reset_shell_mode()</EM></FONT>
1774    <b>pragma</b> Inline (Reset_Curses_Mode);
1775
1776    <FONT COLOR=green><EM>--  #1A NAME="AFU_150"#2|</EM></FONT>
1777    <b>procedure</b> Save_Terminal_State;
1778    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_kernel.3x.html">savetty()</A></EM></FONT>
1779    <b>pragma</b> Inline (Save_Terminal_State);
1780
1781    <FONT COLOR=green><EM>--  #1A NAME="AFU_151"#2|</EM></FONT>
1782    <b>procedure</b> Reset_Terminal_State;
1783    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_kernel.3x.html">resetty();</A></EM></FONT>
1784    <b>pragma</b> Inline (Reset_Terminal_State);
1785
1786    <b>type</b> Stdscr_Init_Proc <b>is</b> <b>access</b>
1787       <b>function</b> (<FONT COLOR=red><A NAME="ref_1782_17">Win</A></FONT>     : <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Window</A>;
1788                 Columns :<A HREF="terminal_interface-curses__ads.htm#ref_1780_9"> </A>Column_Count) <b>return</b> Integer;
1789    <b>pragma</b> Convention (C, Stdscr_Init_Proc);
1790    <FONT COLOR=green><EM>--  N.B.: the return value is actually ignored, but it seems to be</EM></FONT>
1791    <FONT COLOR=green><EM>--        a good practice to return 0 if you think all went fine</EM></FONT>
1792    <FONT COLOR=green><EM>--        and -1 otherwise.</EM></FONT>
1793
1794    <FONT COLOR=green><EM>--  #1A NAME="AFU_152"#2|</EM></FONT>
1795    <b>procedure</b> Rip_Off_Lines (<FONT COLOR=red><A NAME="ref_1790_29" HREF="terminal_interface-curses__adb.htm#ref_2303_29">Lines</A></FONT> : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_1780_9">Integer</A>;
1796                             Proc  : <b>in</b> Stdscr_Init_Proc);
1797    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_kernel.3x.html">ripoffline()</A></EM></FONT>
1798    <FONT COLOR=green><EM>--  N.B.: to be more precise, this uses a ncurses specific enhancement of</EM></FONT>
1799    <FONT COLOR=green><EM>--        ripoffline(), in which the Lines argument absolute value is the</EM></FONT>
1800    <FONT COLOR=green><EM>--        number of lines to be ripped of. The official ripoffline() only</EM></FONT>
1801    <FONT COLOR=green><EM>--        uses the sign of Lines to rip of a single line from bottom or top.</EM></FONT>
1802    <b>pragma</b> Inline (Rip_Off_Lines);
1803
1804    <b>type</b> Cursor_Visibility <b>is</b> (Invisible, Normal, Very_Visible);
1805
1806    <FONT COLOR=green><EM>--  #1A NAME="AFU_153"#2|</EM></FONT>
1807    <b>procedure</b> Set_Cursor_Visibility (Visibility : <b>in</b> <b>out</b> Cursor_Visibility);
1808    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_kernel.3x.html">curs_set()</A></EM></FONT>
1809    <b>pragma</b> Inline (Set_Cursor_Visibility);
1810
1811    <FONT COLOR=green><EM>--  #1A NAME="AFU_154"#2|</EM></FONT>
1812    <b>procedure</b> Nap_Milli_Seconds (Ms : <b>in</b> Natural);
1813    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_kernel.3x.html">napms()</A></EM></FONT>
1814    <b>pragma</b> Inline (Nap_Milli_Seconds);
1815
1816    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1817    <FONT COLOR=green><EM>--  | Some useful helpers.</EM></FONT>
1818    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1819    <b>type</b> Transform_Direction <b>is</b> (From_Screen, To_Screen);
1820    <b>procedure</b> Transform_Coordinates
1821      (<FONT COLOR=red><A NAME="ref_1816_7" HREF="terminal_interface-curses__adb.htm#ref_2397_7">W</A></FONT>      : <b>in</b> Window := Standard_Window;
1822       <FONT COLOR=red><A NAME="ref_1817_7" HREF="terminal_interface-curses__adb.htm#ref_2398_7">Line</A></FONT>   : <b>in</b> <b>out</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
1823       <FONT COLOR=red><A NAME="ref_1818_7" HREF="terminal_interface-curses__adb.htm#ref_2399_7">Column</A></FONT> : <b>in</b> <b>out</b> Column_Position;
1824       Dir    : <b>in</b> Transform_Direction := From_Screen);
1825    <FONT COLOR=green><EM>--  This procedure transforms screen coordinates into coordinates relative</EM></FONT>
1826    <FONT COLOR=green><EM>--  to the window and vice versa, depending on the Dir parameter.</EM></FONT>
1827    <FONT COLOR=green><EM>--  Screen coordinates are the position informations on the physical device.</EM></FONT>
1828    <FONT COLOR=green><EM>--  An Curses_Exception will be raised if Line and Column are not in the</EM></FONT>
1829    <FONT COLOR=green><EM>--  Window or if you pass the Null_Window as argument.</EM></FONT>
1830    <FONT COLOR=green><EM>--  We don't inline this procedure</EM></FONT>
1831
1832    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1833    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/default_colors.3x.html">default_colors.3x</A></EM></FONT>
1834    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1835
1836    <FONT COLOR=green><EM>--  #1A NAME="AFU_155"#2|</EM></FONT>
1837    <b>procedure</b> Use_Default_Colors;
1838    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/default_colors.3x.html">use_default_colors()</A></EM></FONT>
1839    <b>pragma</b> Inline (Use_Default_Colors);
1840
1841    <FONT COLOR=green><EM>--  #1A NAME="AFU_156"#2|</EM></FONT>
1842    <b>procedure</b> Assume_Default_Colors (<FONT COLOR=red><A NAME="ref_1837_37" HREF="terminal_interface-curses__adb.htm#ref_2435_37">Fore</A></FONT> : <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := <A HREF="terminal_interface-curses__ads.htm#ref_285_4">Default_Color</A>;
1843                                     Back : Color_Number := Default_Color);
1844    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/default_colors.3x.html">assume_default_colors()</A></EM></FONT>
1845    <b>pragma</b> Inline (Assume_Default_Colors);
1846
1847    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1848    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_extend.3x.html">curs_extend.3x</A></EM></FONT>
1849    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1850
1851    <FONT COLOR=green><EM>--  #1A NAME="AFU_157"#2|</EM></FONT>
1852    <b>function</b> Curses_Version <b>return</b> String;
1853    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_extend.3x.html">curses_version()</A></EM></FONT>
1854
1855    <FONT COLOR=green><EM>--  #1A NAME="AFU_158"#2|</EM></FONT>
1856    <FONT COLOR=green><EM>--  The returnvalue is the previous setting of the flag</EM></FONT>
1857    <b>function</b> Use_Extended_Names (Enable : Boolean) <b>return</b> Boolean;
1858    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_extend.3x.html">use_extended_names()</A></EM></FONT>
1859
1860    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1861    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_trace.3x.html">curs_trace.3x</A></EM></FONT>
1862    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1863
1864    <FONT COLOR=green><EM>--  #1A NAME="AFU_159"#2|</EM></FONT>
1865    <b>procedure</b> Curses_Free_All;
1866    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_trace.3x.html">_nc_freeall()</A></EM></FONT>
1867
1868    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1869    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_scr_dump.3x.html">curs_scr_dump.3x</A></EM></FONT>
1870    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1871
1872    <FONT COLOR=green><EM>--  #1A NAME="AFU_160"#2|</EM></FONT>
1873    <b>procedure</b> Screen_Dump_To_File (Filename : <b>in</b> String);
1874    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_scr_dump.3x.html">scr_dump()</A></EM></FONT>
1875
1876    <FONT COLOR=green><EM>--  #1A NAME="AFU_161"#2|</EM></FONT>
1877    <b>procedure</b> Screen_Restore_From_File (Filename : <b>in</b> String);
1878    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_scr_dump.3x.html">scr_restore()</A></EM></FONT>
1879
1880    <FONT COLOR=green><EM>--  #1A NAME="AFU_162"#2|</EM></FONT>
1881    <b>procedure</b> Screen_Init_From_File (Filename : <b>in</b> String);
1882    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_scr_dump.3x.html">scr_init()</A></EM></FONT>
1883
1884    <FONT COLOR=green><EM>--  #1A NAME="AFU_163"#2|</EM></FONT>
1885    <b>procedure</b> Screen_Set_File (Filename : <b>in</b> String);
1886    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/curs_scr_dump.3x.html">scr_set()</A></EM></FONT>
1887
1888    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1889    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_print.3x.html">curs_print.3x</A></EM></FONT>
1890    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1891    <FONT COLOR=green><EM>--  Not implemented:  mcprint</EM></FONT>
1892
1893    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1894    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_printw.3x.html">curs_printw.3x</A></EM></FONT>
1895    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1896    <FONT COLOR=green><EM>--  Not implemented: printw,  wprintw, mvprintw, mvwprintw, vwprintw,</EM></FONT>
1897    <FONT COLOR=green><EM>--                   vw_printw</EM></FONT>
1898    <FONT COLOR=green><EM>--  Please use the Ada style Text_IO child packages for formatted</EM></FONT>
1899    <FONT COLOR=green><EM>--  printing. It doesn't make a lot of sense to map the printf style</EM></FONT>
1900    <FONT COLOR=green><EM>--  C functions to Ada.</EM></FONT>
1901
1902    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1903    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/curs_scanw.3x.html">curs_scanw.3x</A></EM></FONT>
1904    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1905    <FONT COLOR=green><EM>--  Not implemented: scanw, wscanw, mvscanw, mvwscanw, vwscanw, vw_scanw</EM></FONT>
1906
1907    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1908    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/resizeterm.3x.html">resizeterm.3x</A></EM></FONT>
1909    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1910    <FONT COLOR=green><EM>--  Not Implemented: resizeterm</EM></FONT>
1911
1912    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1913    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/wresize.3x.html">wresize.3x</A></EM></FONT>
1914    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
1915
1916    <FONT COLOR=green><EM>--  #1A NAME="AFU_164"#2|</EM></FONT>
1917    <b>procedure</b> Resize (<FONT COLOR=red><A NAME="ref_1912_22" HREF="terminal_interface-curses__adb.htm#ref_2540_22">Win</A></FONT>               : <A HREF="terminal_interface-curses__ads.htm#ref_63_12">Window</A> := Standard_Window;
1918                      <FONT COLOR=red><A NAME="ref_1913_22" HREF="terminal_interface-curses__adb.htm#ref_2541_22">Number_Of_Lines</A></FONT>   : <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Line_Count</A>;
1919                      Number_Of_Columns : Column_Count);
1920    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/wresize.3x.html">wresize()</A></EM></FONT>
1921
1922 <b>private</b>
1923    <b>type</b> Window <b>is</b> <b>new</b> System.Storage_Elements.Integer_Address;
1924    Null_Window : <b>constant</b> Window := 0;
1925
1926    <FONT COLOR=green><EM>--  The next constants are generated and may be different on your</EM></FONT>
1927    <FONT COLOR=green><EM>--  architecture.</EM></FONT>
1928    <FONT COLOR=green><EM>--</EM></FONT>
1929    <FONT COLOR=red><A NAME="ref_1924_4">Sizeof_bool</A></FONT>        : <b>constant</b> Natural :=  1; <FONT COLOR=green><EM>--  bool</EM></FONT>
1930    Offset_XY          : <b>constant</b> Natural :=  1; <FONT COLOR=green><EM>--  int</EM></FONT>
1931
1932    <b>type</b> Curses_Bool <b>is</b> <b>mod</b> 2 ** <A HREF="terminal_interface-curses__ads.htm#ref_1926_9">Interfaces</A>.C.char'Size;
1933    Curses_Bool_False : <b>constant</b> Curses_Bool := 0;
1934
1935 <b>end</b> Terminal_Interface.Curses;
1936 </PRE></BODY></HTML>