X-Git-Url: https://ncurses.scripts.mit.edu/?a=blobdiff_plain;f=doc%2Fhtml%2Fada%2Fterminal_interface-curses-forms-field_types-alphanumeric__ads.htm;h=ea08cd270a6bed9f44efa63600ed0cce9eae501a;hb=ce4803687b821efbc5fb2c5a5f06d69cd4dc2656;hp=7580482a595b4007394638b555f84f9ccc63a9f1;hpb=761e4f0825b330e970558e82a4bd638383914429;p=ncurses.git
diff --git a/doc/html/ada/terminal_interface-curses-forms-field_types-alphanumeric__ads.htm b/doc/html/ada/terminal_interface-curses-forms-field_types-alphanumeric__ads.htm
index 7580482a..ea08cd27 100644
--- a/doc/html/ada/terminal_interface-curses-forms-field_types-alphanumeric__ads.htm
+++ b/doc/html/ada/terminal_interface-curses-forms-field_types-alphanumeric__ads.htm
@@ -55,18 +55,18 @@
-package Terminal_Interface.Curses.Forms.Field_Types.AlphaNumeric is
+package Terminal_Interface.Curses.Forms.Field_Types.AlphaNumeric is
pragma Preelaborate
- (Terminal_Interface.Curses.Forms.Field_Types.AlphaNumeric);
+ (Terminal_Interface.Curses.Forms.Field_Types.AlphaNumeric);
- type AlphaNumeric_Field is new Field_Type
+ type AlphaNumeric_Field is new Field_Type
with record
Minimum_Field_Width : Natural := 0;
end record;
- procedure Set_Field_Type (Fld : Field;
+ procedure Set_Field_Type (Fld : Field;
Typ : AlphaNumeric_Field);
pragma Inline (Set_Field_Type);
-end Terminal_Interface.Curses.Forms.Field_Types.AlphaNumeric;
+end Terminal_Interface.Curses.Forms.Field_Types.AlphaNumeric;