X-Git-Url: http://ncurses.scripts.mit.edu/?a=blobdiff_plain;f=doc%2Fhtml%2Fada%2Fterminal_interface-curses-forms-field_types-enumeration-ada__ads.htm;fp=Ada95%2Fhtml%2Fada%2Fterminal_interface-curses-forms-field_types-enumeration-ada__ads.htm;h=d853ce407694a0dc8cac2f705193f58c5605a944;hb=b1f61d9f3aa244512045a6b02e759825d7049d34;hp=4a85547005d9843c2d28b60f0ade336cf8e0184b;hpb=0eb88fc5281804773e2a0c7a488a4452463535ce;p=ncurses.git
diff --git a/Ada95/html/ada/terminal_interface-curses-forms-field_types-enumeration-ada__ads.htm b/doc/html/ada/terminal_interface-curses-forms-field_types-enumeration-ada__ads.htm
similarity index 80%
rename from Ada95/html/ada/terminal_interface-curses-forms-field_types-enumeration-ada__ads.htm
rename to doc/html/ada/terminal_interface-curses-forms-field_types-enumeration-ada__ads.htm
index 4a855470..d853ce40 100644
--- a/Ada95/html/ada/terminal_interface-curses-forms-field_types-enumeration-ada__ads.htm
+++ b/doc/html/ada/terminal_interface-curses-forms-field_types-enumeration-ada__ads.htm
@@ -1,4 +1,4 @@
-terminal_interface-curses-forms-field_types-enumeration-ada.ads
+terminal_interface-curses-forms-field_types-enumeration-ada.ads
File : terminal_interface-curses-forms-field_types-enumeration-ada.ads
@@ -37,28 +37,28 @@
-- sale, use or other dealings in this Software without prior written --
-- authorization. --
------------------------------------------------------------------------------
--- Jürgen Pfeifer (juergen.pfeifer@gmx.net) 1996 --
+-- Author: Jürgen Pfeifer <<juergen.pfeifer@gmx.net>> 1996
-- Version Control:
-- @Revision: 1.8 @
-- Binding Version 01.00
------------------------------------------------------------------------------
generic
- type T is (<>);
+ type T is (<>);
package Terminal_Interface.Curses.Forms.Field_Types.Enumeration.Ada is
pragma Preelaborate
(Terminal_Interface.Curses.Forms.Field_Types.Enumeration.Ada);
- function Create (Set : Type_Set := Mixed_Case;
- Case_Sensitive : Boolean := False;
- Must_Be_Unique : Boolean := False)
+ function Create (Set : Type_Set := Mixed_Case;
+ Case_Sensitive : Boolean := False;
+ Must_Be_Unique : Boolean := False)
return Enumeration_Field;
- function Value (Fld : Field;
- Buf : Buffer_Number := Buffer_Number'First) return T;
- -- Translate the content of the fields buffer - indicated by the
- -- buffer number - into an enumeration value. If the buffer is empty
- -- or the content is invalid, a Constraint_Error is raises.
+ function Value (Fld : Field;
+ Buf : Buffer_Number := Buffer_Number'First) return T;
+ -- Translate the content of the fields buffer - indicated by the
+ -- buffer number - into an enumeration value. If the buffer is empty
+ -- or the content is invalid, a Constraint_Error is raises.
end Terminal_Interface.Curses.Forms.Field_Types.Enumeration.Ada;
\ No newline at end of file