physics.box2d.thin: Add 'box2d_c.b2d_point_collision.ads'.

This commit is contained in:
Rod Kay
2023-12-31 21:34:37 +11:00
parent 036cc6ec92
commit 79cc7c5d56

View File

@@ -0,0 +1,84 @@
-- 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_point_Collision is
-- Item
--
type Item is
record
near_Object : access box2d_c.Object;
Site_world : 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_point_Collision.Item;
-- Pointer
--
package C_Pointers is new interfaces.c.Pointers (Index => interfaces.c.size_t,
Element => box2d_c.b2d_point_Collision.Item,
element_Array => box2d_c.b2d_point_Collision.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_point_Collision.Pointer;
-- Pointer_Pointer
--
package C_Pointer_Pointers is new interfaces.c.Pointers (Index => interfaces.c.size_t,
Element => box2d_c.b2d_point_Collision.Pointer,
element_Array => box2d_c.b2d_point_Collision.Pointer_Array,
default_Terminator => null);
subtype Pointer_Pointer is C_Pointer_Pointers.Pointer;
function construct return box2d_c.b2d_point_Collision.Item;
procedure destruct_0 (Self : in box2d_c.b2d_point_Collision.Item);
procedure destruct (Self : in box2d_c.b2d_point_Collision.Item);
private
pragma Import (CPP, construct, "ada_new_b2d_point_Collision_b2d_point_Collision");
pragma Import (CPP, destruct_0, "_ZN19b2d_point_CollisionD1Ev");
pragma Import (CPP, destruct, "_ZN19b2d_point_CollisionD1Ev");
end box2d_c.b2d_point_Collision;