X-Git-Url: https://ncurses.scripts.mit.edu/?p=ncurses.git;a=blobdiff_plain;f=doc%2Fhtml%2Fada%2Fterminal_interface-curses-forms-field_types-enumeration__ads.htm;fp=doc%2Fhtml%2Fada%2Fterminal_interface-curses-forms-field_types-enumeration__ads.htm;h=88a9fb205bc41cc41635ca118400cdf1effe8c61;hp=8ff65ab55a02f1b2550b2c53a75f9addaeab9c53;hb=027ae42953e3186daed8f3882da73de48291b606;hpb=55ccd2b959766810cf7db8d1c4462f338ce0afc8
diff --git a/doc/html/ada/terminal_interface-curses-forms-field_types-enumeration__ads.htm b/doc/html/ada/terminal_interface-curses-forms-field_types-enumeration__ads.htm
index 8ff65ab5..88a9fb20 100644
--- a/doc/html/ada/terminal_interface-curses-forms-field_types-enumeration__ads.htm
+++ b/doc/html/ada/terminal_interface-curses-forms-field_types-enumeration__ads.htm
@@ -43,11 +43,11 @@
-- @Revision: 1.11 @
-- Binding Version 01.00
------------------------------------------------------------------------------
-with Interfaces.C.Strings;
+with Interfaces.C.Strings;
-package Terminal_Interface.Curses.Forms.Field_Types.Enumeration is
+package Terminal_Interface.Curses.Forms.Field_Types.Enumeration is
pragma Preelaborate
- (Terminal_Interface.Curses.Forms.Field_Types.Enumeration);
+ (Terminal_Interface.Curses.Forms.Field_Types.Enumeration);
type String_Access is access String;
@@ -57,7 +57,7 @@
type Enum_Array is array (Positive range <>)
of String_Access;
- type Enumeration_Info (C : Positive) is
+ type Enumeration_Info (C : Positive) is
record
Names : Enum_Array (1 .. C);
Case_Sensitive : Boolean := False;
@@ -86,12 +86,12 @@
-- The next type defintions are all ncurses extensions. They are typically
-- not available in other curses implementations.
- procedure Set_Field_Type (Fld : in Field;
+ procedure Set_Field_Type (Fld : in Field;
Typ : in Enumeration_Field);
pragma Inline (Set_Field_Type);
private
- type CPA_Access is access Interfaces.C.Strings.chars_ptr_array;
+ type CPA_Access is access Interfaces.C.Strings.chars_ptr_array;
type Enumeration_Field is new Field_Type with
record
@@ -100,5 +100,5 @@
Arr : CPA_Access := null;
end record;
-end Terminal_Interface.Curses.Forms.Field_Types.Enumeration;
+end Terminal_Interface.Curses.Forms.Field_Types.Enumeration;