X-Git-Url: http://ncurses.scripts.mit.edu/?p=ncurses.git;a=blobdiff_plain;f=Ada95%2Fsrc%2Fterminal_interface-curses-forms-field_types-ipv4_address.adb;fp=Ada95%2Fada_include%2Fterminal_interface-curses-forms-field_types-ipv4_address.adb;h=263e50e2c26072e7f2325043fee66227ad3881d2;hp=1cf798793fbfb46dbac355f01453f91239fbc92d;hb=0eb88fc5281804773e2a0c7a488a4452463535ce;hpb=661078ddbde3ce0f3b06e95642fbb9b5fef7dca1 diff --git a/Ada95/ada_include/terminal_interface-curses-forms-field_types-ipv4_address.adb b/Ada95/src/terminal_interface-curses-forms-field_types-ipv4_address.adb similarity index 96% rename from Ada95/ada_include/terminal_interface-curses-forms-field_types-ipv4_address.adb rename to Ada95/src/terminal_interface-curses-forms-field_types-ipv4_address.adb index 1cf79879..263e50e2 100644 --- a/Ada95/ada_include/terminal_interface-curses-forms-field_types-ipv4_address.adb +++ b/Ada95/src/terminal_interface-curses-forms-field_types-ipv4_address.adb @@ -33,17 +33,17 @@ -- sale, use or other dealings in this Software without prior written -- -- authorization. -- ------------------------------------------------------------------------------ --- Author: Juergen Pfeifer 1996 +-- Author: Juergen Pfeifer 1996 -- Version Control: --- $Revision: 1.3 $ --- Binding Version 00.93 +-- $Revision: 1.6 $ +-- Binding Version 01.00 ------------------------------------------------------------------------------ with Interfaces.C; with Terminal_Interface.Curses.Aux; use Terminal_Interface.Curses.Aux; package body Terminal_Interface.Curses.Forms.Field_Types.IPV4_Address is - use type Interfaces.C.Int; + use type Interfaces.C.int; procedure Set_Field_Type (Fld : in Field; Typ : in Internet_V4_Address_Field)