X-Git-Url: http://ncurses.scripts.mit.edu/?a=blobdiff_plain;f=doc%2Fhtml%2Fada%2Fterminal_interface-curses-forms-field_types-enumeration__ads.htm;h=c16e302a4cea6b42ef6a56baae7ecff1d079fb53;hb=efa78d11c3ea7f51c7078b64a34c98b44ecb0e1a;hp=6adc6923269b2d0aa356aaf0cc7d0c47931f08ce;hpb=bca50d0d8592defee6c584fdedd25f4b1a31345b;p=ncurses.git
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 6adc6923..c16e302a 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
@@ -24,7 +24,7 @@
-
+
@@ -52,7 +52,7 @@
-
+
with Interfaces.C.Strings;
@@ -71,12 +71,12 @@
type Enumeration_Info (C : Positive) is
record
- Names : Enum_Array (1 .. C);
- Case_Sensitive : Boolean := False;
- Match_Must_Be_Unique : Boolean := False;
+ Case_Sensitive : Boolean := False;
+ Match_Must_Be_Unique : Boolean := False;
+ Names : Enum_Array (1 .. C);
end record;
- type Enumeration_Field is new Field_Type with private;
+ type Enumeration_Field is new Field_Type with private;
function Create (Info : Enumeration_Info;
Auto_Release_Names : Boolean := False)
@@ -105,7 +105,7 @@
private
type CPA_Access is access Interfaces.C.Strings.chars_ptr_array;
- type Enumeration_Field is new Field_Type with
+ type Enumeration_Field is new Field_Type with
record
Case_Sensitive : Boolean := False;
Match_Must_Be_Unique : Boolean := False;