- C_IPV4_Field_Type : C_Field_Type;
- pragma Import (C, C_IPV4_Field_Type, "TYPE_IPV4");
-
- function Set_Fld_Type (F : Field := Fld;
- Cft : C_Field_Type := C_IPV4_Field_Type)
- return C_Int;
- pragma Import (C, Set_Fld_Type, "set_field_type");
+ function Set_Fld_Type (F : Field := Fld)
+ return Eti_Error;
+ pragma Import (C, Set_Fld_Type, "set_field_type_ipv4");