X-Git-Url: http://ncurses.scripts.mit.edu/?p=ncurses.git;a=blobdiff_plain;f=doc%2Fhtml%2Fada%2Fterminal_interface-curses-forms-form_user_data__ads.htm;h=89b3220cdcdfbf10dd451feb018c390bf5651260;hp=f81ffc56baff10b63e31703229be3507747c1c1f;hb=f7b8e526e024ce141e61633e966255400de67772;hpb=9c9ca6d67ecb4d929b7239cadbd79db649bdf8c6 diff --git a/doc/html/ada/terminal_interface-curses-forms-form_user_data__ads.htm b/doc/html/ada/terminal_interface-curses-forms-form_user_data__ads.htm index f81ffc56..89b3220c 100644 --- a/doc/html/ada/terminal_interface-curses-forms-form_user_data__ads.htm +++ b/doc/html/ada/terminal_interface-curses-forms-form_user_data__ads.htm @@ -3,7 +3,6 @@

File : terminal_interface-curses-forms-form_user_data.ads


-
 ------------------------------------------------------------------------------
 --                                                                          --
 --                           GNAT ncurses Binding                           --
@@ -46,31 +45,31 @@
 ------------------------------------------------------------------------------
 
 generic
-   type User is limited private;
-   type User_Access is access User;
-package Terminal_Interface.Curses.Forms.Form_User_Data is
-   pragma Preelaborate (Terminal_Interface.Curses.Forms.Form_User_Data);
+   type User is limited private;
+   type User_Access is access User;
+package Terminal_Interface.Curses.Forms.Form_User_Data is
+   pragma Preelaborate (Terminal_Interface.Curses.Forms.Form_User_Data);
 
    --  |=====================================================================
    --  | Man page form_userptr.3x
    --  |=====================================================================
 
    --  #1A NAME="AFU_1"#2|
-   procedure Set_User_Data (Frm  : in Form;
-                            Data : in User_Access);
+   procedure Set_User_Data (Frm  : in Form;
+                            Data : in User_Access);
    --  AKA: set_form_userptr
-   pragma Inline (Set_User_Data);
+   pragma Inline (Set_User_Data);
 
    --  #1A NAME="AFU_2"#2|
-   procedure Get_User_Data (Frm  : in  Form;
-                            Data : out User_Access);
+   procedure Get_User_Data (Frm  : in  Form;
+                            Data : out User_Access);
    --  AKA: form_userptr
 
    --  #1A NAME="AFU_3"#2|
-   function Get_User_Data (Frm  : in  Form) return User_Access;
+   function Get_User_Data (Frm  : in  Form) return User_Access;
    --  AKA: form_userptr
    --  Same as function
    pragma Inline (Get_User_Data);
 
-end Terminal_Interface.Curses.Forms.Form_User_Data;
+end Terminal_Interface.Curses.Forms.Form_User_Data;