X-Git-Url: https://ncurses.scripts.mit.edu/?p=ncurses.git;a=blobdiff_plain;f=Ada95%2Fsrc%2Fterminal_interface-curses-forms-field_user_data.adb;fp=Ada95%2Fada_include%2Fterminal_interface-curses-forms-field_user_data.adb;h=711cfbba3374c4a30e12133692f9b6428a811632;hp=a5729d40ace2ed4f0236ad0f2311e18c7ac9c18f;hb=0eb88fc5281804773e2a0c7a488a4452463535ce;hpb=661078ddbde3ce0f3b06e95642fbb9b5fef7dca1 diff --git a/Ada95/ada_include/terminal_interface-curses-forms-field_user_data.adb b/Ada95/src/terminal_interface-curses-forms-field_user_data.adb similarity index 96% rename from Ada95/ada_include/terminal_interface-curses-forms-field_user_data.adb rename to Ada95/src/terminal_interface-curses-forms-field_user_data.adb index a5729d40..711cfbba 100644 --- a/Ada95/ada_include/terminal_interface-curses-forms-field_user_data.adb +++ b/Ada95/src/terminal_interface-curses-forms-field_user_data.adb @@ -33,10 +33,10 @@ -- sale, use or other dealings in this Software without prior written -- -- authorization. -- ------------------------------------------------------------------------------ --- Author: Juergen Pfeifer 1996 +-- Author: Juergen Pfeifer 1996 -- Version Control: --- $Revision: 1.7 $ --- Binding Version 00.93 +-- $Revision: 1.10 $ +-- Binding Version 01.00 ------------------------------------------------------------------------------ with Terminal_Interface.Curses.Aux; use Terminal_Interface.Curses.Aux; @@ -49,7 +49,7 @@ package body Terminal_Interface.Curses.Forms.Field_User_Data is -- | -- | -- | - use type Interfaces.C.Int; + use type Interfaces.C.int; procedure Set_User_Data (Fld : in Field; Data : in User_Access)