-- This file is generated by SWIG. Please do not modify by hand. -- with c_math_c.Vector_3; with Interfaces.C; use Interfaces.C; with interfaces.C.Pointers; package box2d_c.b2d_Contact is -- Item -- type Item is record Object_A : access box2d_c.Object; Object_B : access box2d_c.Object; Site : aliased c_math_c.Vector_3.Item; end record; -- Item_Array -- type Item_Array is array (interfaces.C.Size_t range <>) of aliased box2d_c.b2d_Contact.Item; -- Pointer -- package C_Pointers is new interfaces.c.Pointers (Index => interfaces.c.size_t, Element => box2d_c.b2d_Contact.Item, element_Array => box2d_c.b2d_Contact.Item_Array, default_Terminator => (others => <>)); subtype Pointer is C_Pointers.Pointer; -- Pointer_Array -- type Pointer_Array is array (interfaces.C.Size_t range <>) of aliased box2d_c.b2d_Contact.Pointer; -- Pointer_Pointer -- package C_Pointer_Pointers is new interfaces.c.Pointers (Index => interfaces.c.size_t, Element => box2d_c.b2d_Contact.Pointer, element_Array => box2d_c.b2d_Contact.Pointer_Array, default_Terminator => null); subtype Pointer_Pointer is C_Pointer_Pointers.Pointer; function construct return box2d_c.b2d_Contact.Item; procedure destruct_0 (Self : in box2d_c.b2d_Contact.Item); procedure destruct (Self : in box2d_c.b2d_Contact.Item); private pragma Import (CPP, construct, "ada_new_b2d_Contact_b2d_Contact"); pragma Import (CPP, destruct_0, "_ZN11b2d_ContactD1Ev"); pragma Import (CPP, destruct, "_ZN11b2d_ContactD1Ev"); end box2d_c.b2d_Contact;