60 lines
1.6 KiB
Ada
60 lines
1.6 KiB
Ada
-- This file is generated by SWIG. Please do not modify by hand.
|
|
--
|
|
with c_math_c.Vector_3;
|
|
with 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;
|