diff --git a/3-mid/physics/implement/box2d/source/thin/box2d_c-b2d_contact.ads b/3-mid/physics/implement/box2d/source/thin/box2d_c-b2d_contact.ads index 5b199cf..398d48c 100644 --- a/3-mid/physics/implement/box2d/source/thin/box2d_c-b2d_contact.ads +++ b/3-mid/physics/implement/box2d/source/thin/box2d_c-b2d_contact.ads @@ -11,9 +11,9 @@ with interfaces.C.Pointers; package box2d_c.b2d_Contact is -- Item - -- + -- -type Item is +type Item is record Object_A : access box2d_c.Object; Object_B : access box2d_c.Object; @@ -23,13 +23,13 @@ type Item is -- 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, @@ -38,13 +38,13 @@ type Item is 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, diff --git a/3-mid/physics/implement/box2d/source/thin/box2d_c-b2d_point_collision.ads b/3-mid/physics/implement/box2d/source/thin/box2d_c-b2d_point_collision.ads index 918ba84..cd1b313 100644 --- a/3-mid/physics/implement/box2d/source/thin/box2d_c-b2d_point_collision.ads +++ b/3-mid/physics/implement/box2d/source/thin/box2d_c-b2d_point_collision.ads @@ -11,9 +11,9 @@ with interfaces.C.Pointers; package box2d_c.b2d_point_Collision is -- Item - -- + -- -type Item is +type Item is record near_Object : access box2d_c.Object; Site_world : aliased c_math_c.Vector_3.Item; @@ -22,13 +22,13 @@ type Item is -- 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, @@ -37,13 +37,13 @@ type Item is 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, diff --git a/3-mid/physics/implement/box2d/source/thin/box2d_c-b2d_ray_collision.ads b/3-mid/physics/implement/box2d/source/thin/box2d_c-b2d_ray_collision.ads index 4ef4dd9..353fe9d 100644 --- a/3-mid/physics/implement/box2d/source/thin/box2d_c-b2d_ray_collision.ads +++ b/3-mid/physics/implement/box2d/source/thin/box2d_c-b2d_ray_collision.ads @@ -12,9 +12,9 @@ with interfaces.C.Pointers; package box2d_c.b2d_ray_Collision is -- Item - -- + -- -type Item is +type Item is record near_Object : access box2d_c.Object; hit_Fraction : aliased c_math_c.Real; @@ -25,13 +25,13 @@ type Item is -- Item_Array - -- + -- type Item_Array is array (interfaces.C.Size_t range <>) of aliased box2d_c.b2d_ray_Collision.Item; -- Pointer - -- + -- package C_Pointers is new interfaces.c.Pointers (Index => interfaces.c.size_t, Element => box2d_c.b2d_ray_Collision.Item, element_Array => box2d_c.b2d_ray_Collision.Item_Array, @@ -40,13 +40,13 @@ type Item is subtype Pointer is C_Pointers.Pointer; -- Pointer_Array - -- + -- type Pointer_Array is array (interfaces.C.Size_t range <>) of aliased box2d_c.b2d_ray_Collision.Pointer; -- Pointer_Pointer - -- + -- package C_Pointer_Pointers is new interfaces.c.Pointers (Index => interfaces.c.size_t, Element => box2d_c.b2d_ray_Collision.Pointer, element_Array => box2d_c.b2d_ray_Collision.Pointer_Array, diff --git a/3-mid/physics/implement/box2d/source/thin/box2d_c-binding.ads b/3-mid/physics/implement/box2d/source/thin/box2d_c-binding.ads index 250f228..008d006 100644 --- a/3-mid/physics/implement/box2d/source/thin/box2d_c-binding.ads +++ b/3-mid/physics/implement/box2d/source/thin/box2d_c-binding.ads @@ -29,34 +29,34 @@ package box2d_c.Binding is function b2d_new_Circle (Radius : in c_math_c.Real) return box2d_c.Pointers.Shape_Pointer; function b2d_new_Polygon (Vertices : in c_math_c.Vector_2.Pointer; -vertex_Count : in interfaces.c.int) return box2d_c.Pointers.Shape_Pointer; + vertex_Count : in interfaces.c.int) return box2d_c.Pointers.Shape_Pointer; function b2d_new_Box (half_Extents : in c_math_c.Vector_3.Pointer) return box2d_c.Pointers.Shape_Pointer; function b2d_new_Capsule (Radii : in c_math_c.Vector_2.Pointer; -Height : in c_math_c.Real) return box2d_c.Pointers.Shape_Pointer; + Height : in c_math_c.Real) return box2d_c.Pointers.Shape_Pointer; function b2d_new_Cone (Radius : in c_math_c.Real; -Height : in c_math_c.Real) return box2d_c.Pointers.Shape_Pointer; + Height : in c_math_c.Real) return box2d_c.Pointers.Shape_Pointer; function b2d_new_convex_Hull (Points : in c_math_c.Vector_3.Pointer; -point_Count : in interfaces.c.int) return box2d_c.Pointers.Shape_Pointer; + point_Count : in interfaces.c.int) return box2d_c.Pointers.Shape_Pointer; function b2d_new_Cylinder (half_Extents : in c_math_c.Vector_3.Pointer) return box2d_c.Pointers.Shape_Pointer; function b2d_new_Heightfield (Width : in interfaces.c.int; -Depth : in interfaces.c.int; -Heights : in c_math_c.Pointers.Real_Pointer; -min_Height : in c_math_c.Real; -max_Height : in c_math_c.Real; -Scale : in c_math_c.Vector_3.Pointer) return box2d_c.Pointers.Shape_Pointer; + Depth : in interfaces.c.int; + Heights : in c_math_c.Pointers.Real_Pointer; + min_Height : in c_math_c.Real; + max_Height : in c_math_c.Real; + Scale : in c_math_c.Vector_3.Pointer) return box2d_c.Pointers.Shape_Pointer; function b2d_new_multiSphere (Positions : in c_math_c.Vector_3.Pointer; -Radii : in c_math_c.Pointers.Real_Pointer; -sphere_Count : in interfaces.c.int) return box2d_c.Pointers.Shape_Pointer; + Radii : in c_math_c.Pointers.Real_Pointer; + sphere_Count : in interfaces.c.int) return box2d_c.Pointers.Shape_Pointer; function b2d_new_Plane (Normal : in c_math_c.Vector_3.Pointer; -Offset : in c_math_c.Real) return box2d_c.Pointers.Shape_Pointer; + Offset : in c_math_c.Real) return box2d_c.Pointers.Shape_Pointer; function b2d_new_Sphere (Radius : in c_math_c.Real) return box2d_c.Pointers.Shape_Pointer; @@ -65,125 +65,126 @@ Offset : in c_math_c.Real) return box2d_c.Pointers.Shape_Pointer; function b2d_Shape_user_Data (Self : in box2d_c.Pointers.Shape_Pointer) return swig.void_ptr; procedure b2d_Shape_user_Data_is (Self : in box2d_c.Pointers.Shape_Pointer; -Now : in swig.void_ptr); + Now : in swig.void_ptr); procedure b2d_shape_Scale_is (Self : in box2d_c.Pointers.Shape_Pointer; -Now : in c_math_c.Vector_2.Item); + Now : in c_math_c.Vector_2.Item); function b2d_new_Object (Site : in c_math_c.Vector_2.Pointer; -Mass : in c_math_c.Real; -Friction : in c_math_c.Real; -Restitution : in c_math_c.Real; -the_Shape : in box2d_c.Pointers.Shape_Pointer) return box2d_c.Pointers.Object_Pointer; + Mass : in c_math_c.Real; + Friction : in c_math_c.Real; + Restitution : in c_math_c.Real; + the_Shape : in box2d_c.Pointers.Shape_Pointer) return box2d_c.Pointers.Object_Pointer; procedure b2d_free_Object (Self : in box2d_c.Pointers.Object_Pointer); procedure b2d_Object_Scale_is (Self : in box2d_c.Pointers.Object_Pointer; -Now : in c_math_c.Vector_2.Pointer); + Now : in c_math_c.Vector_2.Pointer); function b2d_Object_Shape (Self : in box2d_c.Pointers.Object_Pointer) return box2d_c.Pointers.Shape_Pointer; function b2d_Object_user_Data (Self : in box2d_c.Pointers.Object_Pointer) return swig.void_ptr; procedure b2d_Object_user_Data_is (Self : in box2d_c.Pointers.Object_Pointer; -Now : in swig.void_ptr); + Now : in swig.void_ptr); function b2d_Object_Mass (Self : in box2d_c.Pointers.Object_Pointer) return c_math_c.Real; procedure b2d_Object_Friction_is (Self : in box2d_c.Pointers.Object_Pointer; -Now : in c_math_c.Real); + Now : in c_math_c.Real); procedure b2d_Object_Restitution_is (Self : in box2d_c.Pointers.Object_Pointer; -Now : in c_math_c.Real); + Now : in c_math_c.Real); function b2d_Object_Site (Self : in box2d_c.Pointers.Object_Pointer) return c_math_c.Vector_3.Item; procedure b2d_Object_Site_is (Self : in box2d_c.Pointers.Object_Pointer; -Now : in c_math_c.Vector_3.Pointer); + Now : in c_math_c.Vector_3.Pointer); function b2d_Object_Spin (Self : in box2d_c.Pointers.Object_Pointer) return c_math_c.Matrix_3x3.Item; procedure b2d_Object_Spin_is (Self : in box2d_c.Pointers.Object_Pointer; -Now : in c_math_c.Matrix_3x3.Pointer); + Now : in c_math_c.Matrix_3x3.Pointer); function b2d_Object_xy_Spin (Self : in box2d_c.Pointers.Object_Pointer) return c_math_c.Real; procedure b2d_Object_xy_Spin_is (Self : in box2d_c.Pointers.Object_Pointer; -Now : in c_math_c.Real); + Now : in c_math_c.Real); function b2d_Object_Transform (Self : in box2d_c.Pointers.Object_Pointer) return c_math_c.Matrix_4x4.Item; procedure b2d_Object_Transform_is (Self : in box2d_c.Pointers.Object_Pointer; -Now : in c_math_c.Matrix_4x4.Pointer); + Now : in c_math_c.Matrix_4x4.Pointer); function b2d_Object_Speed (Self : in box2d_c.Pointers.Object_Pointer) return c_math_c.Vector_3.Item; procedure b2d_Object_Speed_is (Self : in box2d_c.Pointers.Object_Pointer; -Now : in c_math_c.Vector_3.Pointer); + Now : in c_math_c.Vector_3.Pointer); function b2d_Object_Gyre (Self : in box2d_c.Pointers.Object_Pointer) return c_math_c.Vector_3.Item; procedure b2d_Object_Gyre_is (Self : in box2d_c.Pointers.Object_Pointer; -Now : in c_math_c.Vector_3.Pointer); + Now : in c_math_c.Vector_3.Pointer); procedure b2d_Object_apply_Force (Self : in box2d_c.Pointers.Object_Pointer; -Force : in c_math_c.Vector_3.Pointer); + Force : in c_math_c.Vector_3.Pointer); procedure b2d_Object_apply_Torque (Self : in box2d_c.Pointers.Object_Pointer; -Torque : in c_math_c.Vector_3.Pointer); + Torque : in c_math_c.Vector_3.Pointer); procedure b2d_Object_apply_Torque_impulse (Self : in box2d_c.Pointers.Object_Pointer; -Torque : in c_math_c.Vector_3.Pointer); + Torque : in c_math_c.Vector_3.Pointer); procedure b2d_dump (Self : in box2d_c.Pointers.Object_Pointer); function b2d_new_hinge_Joint_with_local_anchors (in_Space : in box2d_c.Pointers.Space_Pointer; -Object_A : in box2d_c.Pointers.Object_Pointer; -Object_B : in box2d_c.Pointers.Object_Pointer; -Anchor_in_A : in c_math_c.Vector_3.Pointer; -Anchor_in_B : in c_math_c.Vector_3.Pointer; -low_Limit : in interfaces.c.c_float; -high_Limit : in interfaces.c.c_float; -collide_Connected : in swig.bool) return box2d_c.Pointers.Joint_Pointer; + Object_A : in box2d_c.Pointers.Object_Pointer; + Object_B : in box2d_c.Pointers.Object_Pointer; + Anchor_in_A : in c_math_c.Vector_3.Pointer; + Anchor_in_B : in c_math_c.Vector_3.Pointer; + low_Limit : in interfaces.c.c_float; + high_Limit : in interfaces.c.c_float; + collide_Connected : in swig.bool) return box2d_c.Pointers.Joint_Pointer; function b2d_new_hinge_Joint (in_Space : in box2d_c.Pointers.Space_Pointer; -Object_A : in box2d_c.Pointers.Object_Pointer; -Object_B : in box2d_c.Pointers.Object_Pointer; -Frame_A : in c_math_c.Matrix_4x4.Pointer; -Frame_B : in c_math_c.Matrix_4x4.Pointer; -low_Limit : in interfaces.c.c_float; -high_Limit : in interfaces.c.c_float; -collide_Connected : in swig.bool) return box2d_c.Pointers.Joint_Pointer; + Object_A : in box2d_c.Pointers.Object_Pointer; + Object_B : in box2d_c.Pointers.Object_Pointer; + Frame_A : in c_math_c.Matrix_4x4.Pointer; + Frame_B : in c_math_c.Matrix_4x4.Pointer; + low_Limit : in interfaces.c.c_float; + high_Limit : in interfaces.c.c_float; + collide_Connected : in swig.bool) return box2d_c.Pointers.Joint_Pointer; procedure b2d_free_hinge_Joint (Self : in box2d_c.Pointers.Joint_Pointer); - function b2d_new_space_hinge_Joint (Object_A : in box2d_c.Pointers.Object_Pointer; -Frame_A : in c_math_c.Matrix_4x4.Pointer) return box2d_c.Pointers.Joint_Pointer; + function b2d_new_space_hinge_Joint (in_Space : in box2d_c.Pointers.Space_Pointer; + Object_A : in box2d_c.Pointers.Object_Pointer; + Frame_A : in c_math_c.Matrix_4x4.Pointer) return box2d_c.Pointers.Joint_Pointer; function b2d_new_DoF6_Joint (Object_A : in box2d_c.Pointers.Object_Pointer; -Object_B : in box2d_c.Pointers.Object_Pointer; -Frame_A : in c_math_c.Matrix_4x4.Pointer; -Frame_B : in c_math_c.Matrix_4x4.Pointer) return box2d_c.Pointers.Joint_Pointer; + Object_B : in box2d_c.Pointers.Object_Pointer; + Frame_A : in c_math_c.Matrix_4x4.Pointer; + Frame_B : in c_math_c.Matrix_4x4.Pointer) return box2d_c.Pointers.Joint_Pointer; function b2d_new_cone_twist_Joint (Object_A : in box2d_c.Pointers.Object_Pointer; -Object_B : in box2d_c.Pointers.Object_Pointer; -Frame_A : in c_math_c.Matrix_4x4.Pointer; -Frame_B : in c_math_c.Matrix_4x4.Pointer) return box2d_c.Pointers.Joint_Pointer; + Object_B : in box2d_c.Pointers.Object_Pointer; + Frame_A : in c_math_c.Matrix_4x4.Pointer; + Frame_B : in c_math_c.Matrix_4x4.Pointer) return box2d_c.Pointers.Joint_Pointer; function b2d_new_slider_Joint (Object_A : in box2d_c.Pointers.Object_Pointer; -Object_B : in box2d_c.Pointers.Object_Pointer; -Frame_A : in c_math_c.Matrix_4x4.Pointer; -Frame_B : in c_math_c.Matrix_4x4.Pointer) return box2d_c.Pointers.Joint_Pointer; + Object_B : in box2d_c.Pointers.Object_Pointer; + Frame_A : in c_math_c.Matrix_4x4.Pointer; + Frame_B : in c_math_c.Matrix_4x4.Pointer) return box2d_c.Pointers.Joint_Pointer; function b2d_new_ball_Joint (Object_A : in box2d_c.Pointers.Object_Pointer; -Object_B : in box2d_c.Pointers.Object_Pointer; -Pivot_in_A : in c_math_c.Vector_3.Pointer; -Pivot_in_B : in c_math_c.Vector_3.Pointer) return box2d_c.Pointers.Joint_Pointer; + Object_B : in box2d_c.Pointers.Object_Pointer; + Pivot_in_A : in c_math_c.Vector_3.Pointer; + Pivot_in_B : in c_math_c.Vector_3.Pointer) return box2d_c.Pointers.Joint_Pointer; function b2d_Joint_user_Data (Self : in box2d_c.Pointers.Joint_Pointer) return swig.void_ptr; procedure b2d_Joint_user_Data_is (Self : in box2d_c.Pointers.Joint_Pointer; -Now : in swig.void_ptr); + Now : in swig.void_ptr); function b2d_Joint_Object_A (Self : in box2d_c.Pointers.Joint_Pointer) return box2d_c.Pointers.Object_Pointer; @@ -194,48 +195,48 @@ Now : in swig.void_ptr); function b2d_Joint_Frame_B (Self : in box2d_c.Pointers.Joint_Pointer) return c_math_c.Matrix_4x4.Item; procedure b2d_Joint_Frame_A_is (Self : in box2d_c.Pointers.Joint_Pointer; -Now : in c_math_c.Matrix_4x4.Pointer); + Now : in c_math_c.Matrix_4x4.Pointer); procedure b2d_Joint_Frame_B_is (Self : in box2d_c.Pointers.Joint_Pointer; -Now : in c_math_c.Matrix_4x4.Pointer); + Now : in c_math_c.Matrix_4x4.Pointer); procedure b2d_Joint_set_local_Anchor (Self : in box2d_c.Pointers.Joint_Pointer; -is_Anchor_A : in swig.bool; -local_Anchor : in c_math_c.Vector_3.Pointer); + is_Anchor_A : in swig.bool; + local_Anchor : in c_math_c.Vector_3.Pointer); function b2d_Joint_is_Limited (Self : in box2d_c.Pointers.Joint_Pointer; -DoF : in interfaces.c.int) return swig.bool; + DoF : in interfaces.c.int) return swig.bool; function b2d_Joint_Extent (Self : in box2d_c.Pointers.Joint_Pointer; -DoF : in interfaces.c.int) return swig.bool; + DoF : in interfaces.c.int) return swig.bool; procedure b2d_Joint_Velocity_is (Self : in box2d_c.Pointers.Joint_Pointer; -DoF : in interfaces.c.int; -Now : in c_math_c.Real); + DoF : in interfaces.c.int; + Now : in c_math_c.Real); function b2d_Joint_reaction_Force (Self : in box2d_c.Pointers.Joint_Pointer) return c_math_c.Vector_3.Item; function b2d_Joint_reaction_Torque (Self : in box2d_c.Pointers.Joint_Pointer) return c_math_c.Real; procedure b2d_Joint_hinge_Limits_are (Self : in box2d_c.Pointers.Joint_Pointer; -Low : in c_math_c.Real; -High : in c_math_c.Real); + Low : in c_math_c.Real; + High : in c_math_c.Real); function b2d_new_Space return box2d_c.Pointers.Space_Pointer; procedure b2d_free_Space (Self : in box2d_c.Pointers.Space_Pointer); procedure b2d_Space_add_Object (Self : in box2d_c.Pointers.Space_Pointer; -the_Object : in box2d_c.Pointers.Object_Pointer); + the_Object : in box2d_c.Pointers.Object_Pointer); procedure b2d_Space_rid_Object (Self : in box2d_c.Pointers.Space_Pointer; -the_Object : in box2d_c.Pointers.Object_Pointer); + the_Object : in box2d_c.Pointers.Object_Pointer); procedure b2d_Space_add_Joint (Self : in box2d_c.Pointers.Space_Pointer; -the_Joint : in box2d_c.Pointers.Joint_Pointer); + the_Joint : in box2d_c.Pointers.Joint_Pointer); procedure b2d_Space_rid_Joint (Self : in box2d_c.Pointers.Space_Pointer; -the_Joint : in box2d_c.Pointers.Joint_Pointer); + the_Joint : in box2d_c.Pointers.Joint_Pointer); function b2d_b2Joint_user_Data (the_Joint : in box2d_c.Pointers.b2Joint_Pointer) return swig.void_ptr; @@ -246,22 +247,22 @@ the_Joint : in box2d_c.Pointers.Joint_Pointer); function b2d_Space_joint_Element (Cursor : in box2d_c.joint_Cursor.Pointer) return box2d_c.Pointers.b2Joint_Pointer; procedure b2d_Space_Gravity_is (Self : in box2d_c.Pointers.Space_Pointer; -Now : in c_math_c.Vector_3.Pointer); + Now : in c_math_c.Vector_3.Pointer); procedure b2d_Space_evolve (Self : in box2d_c.Pointers.Space_Pointer; -By : in interfaces.c.c_float); + By : in interfaces.c.c_float); function b2d_Space_cast_Ray (Self : in box2d_c.Pointers.Space_Pointer; -From : in c_math_c.Vector_3.Pointer; -To : in c_math_c.Vector_3.Pointer) return box2d_c.b2d_ray_Collision.Item; + From : in c_math_c.Vector_3.Pointer; + To : in c_math_c.Vector_3.Pointer) return box2d_c.b2d_ray_Collision.Item; function b2d_Space_cast_Point (Self : in box2d_c.Pointers.Space_Pointer; -Point : in c_math_c.Vector_3.Pointer) return box2d_c.b2d_point_Collision.Item; + Point : in c_math_c.Vector_3.Pointer) return box2d_c.b2d_point_Collision.Item; function b2d_space_contact_Count (Self : in box2d_c.Pointers.Space_Pointer) return interfaces.c.int; function b2d_space_Contact (Self : in box2d_c.Pointers.Space_Pointer; -contact_Id : in interfaces.c.int) return box2d_c.b2d_Contact.Item; + contact_Id : in interfaces.c.int) return box2d_c.b2d_Contact.Item; diff --git a/3-mid/physics/implement/box2d/source/thin/box2d_c-joint_cursor.ads b/3-mid/physics/implement/box2d/source/thin/box2d_c-joint_cursor.ads index 77def45..81dcbd9 100644 --- a/3-mid/physics/implement/box2d/source/thin/box2d_c-joint_cursor.ads +++ b/3-mid/physics/implement/box2d/source/thin/box2d_c-joint_cursor.ads @@ -10,9 +10,9 @@ with interfaces.C.Pointers; package box2d_c.joint_Cursor is -- Item - -- + -- -type Item is +type Item is record Joint : access box2d_c.b2Joint; end record; @@ -20,13 +20,13 @@ type Item is -- Item_Array - -- + -- type Item_Array is array (interfaces.C.Size_t range <>) of aliased box2d_c.joint_Cursor.Item; -- Pointer - -- + -- package C_Pointers is new interfaces.c.Pointers (Index => interfaces.c.size_t, Element => box2d_c.joint_Cursor.Item, element_Array => box2d_c.joint_Cursor.Item_Array, @@ -35,13 +35,13 @@ type Item is subtype Pointer is C_Pointers.Pointer; -- Pointer_Array - -- + -- type Pointer_Array is array (interfaces.C.Size_t range <>) of aliased box2d_c.joint_Cursor.Pointer; -- Pointer_Pointer - -- + -- package C_Pointer_Pointers is new interfaces.c.Pointers (Index => interfaces.c.size_t, Element => box2d_c.joint_Cursor.Pointer, element_Array => box2d_c.joint_Cursor.Pointer_Array, diff --git a/3-mid/physics/implement/box2d/source/thin/box2d_c-pointers.ads b/3-mid/physics/implement/box2d/source/thin/box2d_c-pointers.ads index 73c75be..d22c73e 100644 --- a/3-mid/physics/implement/box2d/source/thin/box2d_c-pointers.ads +++ b/3-mid/physics/implement/box2d/source/thin/box2d_c-pointers.ads @@ -1,96 +1,90 @@ -- This file is generated by SWIG. Please do not modify by hand. -- -with interfaces.C.Pointers, - System; +with Interfaces.C; + +use Interfaces.C; +with interfaces.C.Pointers; +with System; -package box2d_c.Pointers -is - use System; - +package box2d_c.Pointers is + -- Shape_Pointer - -- + -- package C_Shape_Pointers is new interfaces.c.Pointers (Index => interfaces.c.size_t, Element => box2d_c.Shape, element_Array => box2d_c.Shape_Array, - default_Terminator => null_Address); + default_Terminator => System.null_Address); -subtype Shape_Pointer is C_Shape_Pointers.Pointer; + subtype Shape_Pointer is C_Shape_Pointers.Pointer; -- Shape_Pointer_Array - -- + -- type Shape_Pointer_Array is array (interfaces.C.Size_t range <>) of aliased box2d_c.Pointers.Shape_Pointer; -- Object_Pointer - -- + -- package C_Object_Pointers is new interfaces.c.Pointers (Index => interfaces.c.size_t, Element => box2d_c.Object, element_Array => box2d_c.Object_Array, - default_Terminator => null_Address); + default_Terminator => System.null_Address); -subtype Object_Pointer is C_Object_Pointers.Pointer; + subtype Object_Pointer is C_Object_Pointers.Pointer; -- Object_Pointer_Array - -- + -- type Object_Pointer_Array is array (interfaces.C.Size_t range <>) of aliased box2d_c.Pointers.Object_Pointer; -- Joint_Pointer - -- + -- package C_Joint_Pointers is new interfaces.c.Pointers (Index => interfaces.c.size_t, Element => box2d_c.Joint, element_Array => box2d_c.Joint_Array, - default_Terminator => null_Address); + default_Terminator => System.null_Address); -subtype Joint_Pointer is C_Joint_Pointers.Pointer; + subtype Joint_Pointer is C_Joint_Pointers.Pointer; -- Joint_Pointer_Array - -- + -- type Joint_Pointer_Array is array (interfaces.C.Size_t range <>) of aliased box2d_c.Pointers.Joint_Pointer; -- Space_Pointer - -- + -- package C_Space_Pointers is new interfaces.c.Pointers (Index => interfaces.c.size_t, Element => box2d_c.Space, element_Array => box2d_c.Space_Array, - default_Terminator => null_Address); + default_Terminator => System.null_Address); -subtype Space_Pointer is C_Space_Pointers.Pointer; + subtype Space_Pointer is C_Space_Pointers.Pointer; -- Space_Pointer_Array - -- + -- type Space_Pointer_Array is array (interfaces.C.Size_t range <>) of aliased box2d_c.Pointers.Space_Pointer; -- b2Joint_Pointer - -- + -- package C_b2Joint_Pointers is new interfaces.c.Pointers (Index => interfaces.c.size_t, Element => box2d_c.b2Joint, element_Array => box2d_c.b2Joint_Array, - default_Terminator => null_Address); + default_Terminator => System.null_Address); -subtype b2Joint_Pointer is C_b2Joint_Pointers.Pointer; + subtype b2Joint_Pointer is C_b2Joint_Pointers.Pointer; -- b2Joint_Pointer_Array - -- + -- type b2Joint_Pointer_Array is array (interfaces.C.Size_t range <>) of aliased box2d_c.Pointers.b2Joint_Pointer; - - - - - - - end box2d_c.Pointers; diff --git a/3-mid/physics/implement/box2d/source/thin/box2d_c.ads b/3-mid/physics/implement/box2d/source/thin/box2d_c.ads index e8cabf9..4e64c9f 100644 --- a/3-mid/physics/implement/box2d/source/thin/box2d_c.ads +++ b/3-mid/physics/implement/box2d/source/thin/box2d_c.ads @@ -10,31 +10,31 @@ use Interfaces.C; package box2d_c is -- Shape - -- + -- subtype Shape is swig.opaque_structure; type Shape_array is array (interfaces.C.Size_t range <>) of aliased box2d_c.Shape; -- Object - -- + -- subtype Object is swig.opaque_structure; type Object_array is array (interfaces.C.Size_t range <>) of aliased box2d_c.Object; -- Joint - -- + -- subtype Joint is swig.opaque_structure; type Joint_array is array (interfaces.C.Size_t range <>) of aliased box2d_c.Joint; -- Space - -- + -- subtype Space is swig.opaque_structure; type Space_array is array (interfaces.C.Size_t range <>) of aliased box2d_c.Space; -- b2Joint - -- + -- subtype b2Joint is swig.opaque_structure; type b2Joint_array is array (interfaces.C.Size_t range <>) of aliased box2d_c.b2Joint; diff --git a/3-mid/physics/implement/box2d/source/thin/box2d_c_wrap.cxx b/3-mid/physics/implement/box2d/source/thin/box2d_c_wrap.cxx index f33913f..f7f9e25 100644 --- a/3-mid/physics/implement/box2d/source/thin/box2d_c_wrap.cxx +++ b/3-mid/physics/implement/box2d/source/thin/box2d_c_wrap.cxx @@ -164,9 +164,9 @@ template T SwigValueInit() { # define DllExport __declspec( dllexport ) # define SWIGSTDCALL __stdcall #else -# define DllExport +# define DllExport # define SWIGSTDCALL -#endif +#endif #ifdef __cplusplus # include @@ -185,10 +185,10 @@ extern "C" #include "../c/box2d-space.h" } - - -#ifdef __cplusplus + + +#ifdef __cplusplus extern "C" { #endif DllExport void * SWIGSTDCALL Ada_b2d_new_Circle ( @@ -198,18 +198,18 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_Circle ( void * jresult ; Real arg1 ; Shape *result = 0 ; - - - arg1 = (Real) a_arg1; - - + + + arg1 = (Real) a_arg1; + + result = (Shape *)b2d_new_Circle(arg1); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -217,7 +217,7 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_Circle ( DllExport void * SWIGSTDCALL Ada_b2d_new_Polygon ( void * a_arg1 , - + int a_arg2 ) { @@ -225,20 +225,20 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_Polygon ( Vector_2 *arg1 ; int arg2 ; Shape *result = 0 ; - - arg1 = (Vector_2 *) a_arg1; - - - arg2 = (int) a_arg2; - - + + arg1 = (Vector_2 *) a_arg1; + + + arg2 = (int) a_arg2; + + result = (Shape *)b2d_new_Polygon(arg1,arg2); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -250,16 +250,16 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_Box ( void * jresult ; Vector_3 *arg1 = (Vector_3 *) 0 ; Shape *result = 0 ; - - arg1 = (Vector_3 *)a_arg1; - + + arg1 = (Vector_3 *)a_arg1; + result = (Shape *)b2d_new_Box(arg1); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -267,7 +267,7 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_Box ( DllExport void * SWIGSTDCALL Ada_b2d_new_Capsule ( void * a_arg1 , - + float a_arg2 ) { @@ -275,20 +275,20 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_Capsule ( Vector_2 *arg1 = (Vector_2 *) 0 ; Real arg2 ; Shape *result = 0 ; - - arg1 = (Vector_2 *)a_arg1; - - - arg2 = (Real) a_arg2; - - + + arg1 = (Vector_2 *)a_arg1; + + + arg2 = (Real) a_arg2; + + result = (Shape *)b2d_new_Capsule(arg1,arg2); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -296,7 +296,7 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_Capsule ( DllExport void * SWIGSTDCALL Ada_b2d_new_Cone ( float a_arg1 , - + float a_arg2 ) { @@ -304,22 +304,22 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_Cone ( Real arg1 ; Real arg2 ; Shape *result = 0 ; - - - arg1 = (Real) a_arg1; - - - - arg2 = (Real) a_arg2; - - + + + arg1 = (Real) a_arg1; + + + + arg2 = (Real) a_arg2; + + result = (Shape *)b2d_new_Cone(arg1,arg2); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -327,7 +327,7 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_Cone ( DllExport void * SWIGSTDCALL Ada_b2d_new_convex_Hull ( void * a_arg1 , - + int a_arg2 ) { @@ -335,20 +335,20 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_convex_Hull ( Vector_3 *arg1 ; int arg2 ; Shape *result = 0 ; - - arg1 = (Vector_3 *) a_arg1; - - - arg2 = (int) a_arg2; - - + + arg1 = (Vector_3 *) a_arg1; + + + arg2 = (int) a_arg2; + + result = (Shape *)b2d_new_convex_Hull(arg1,arg2); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -360,16 +360,16 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_Cylinder ( void * jresult ; Vector_3 *arg1 = (Vector_3 *) 0 ; Shape *result = 0 ; - - arg1 = (Vector_3 *)a_arg1; - + + arg1 = (Vector_3 *)a_arg1; + result = (Shape *)b2d_new_Cylinder(arg1); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -377,19 +377,19 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_Cylinder ( DllExport void * SWIGSTDCALL Ada_b2d_new_Heightfield ( int a_arg1 , - + int a_arg2 , - + float* a_arg3 , - + float a_arg4 , - + float a_arg5 , - + void * a_arg6 ) { @@ -401,36 +401,36 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_Heightfield ( Real arg5 ; Vector_3 *arg6 = (Vector_3 *) 0 ; Shape *result = 0 ; - - - arg1 = (int) a_arg1; - - - - arg2 = (int) a_arg2; - - - + + + arg1 = (int) a_arg1; + + + + arg2 = (int) a_arg2; + + + arg3 = (Real *) a_arg3; - - - - arg4 = (Real) a_arg4; - - - - arg5 = (Real) a_arg5; - - - arg6 = (Vector_3 *)a_arg6; - + + + + arg4 = (Real) a_arg4; + + + + arg5 = (Real) a_arg5; + + + arg6 = (Vector_3 *)a_arg6; + result = (Shape *)b2d_new_Heightfield(arg1,arg2,arg3,arg4,arg5,arg6); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -438,10 +438,10 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_Heightfield ( DllExport void * SWIGSTDCALL Ada_b2d_new_multiSphere ( void * a_arg1 , - + float* a_arg2 , - + int a_arg3 ) { @@ -450,24 +450,24 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_multiSphere ( Real *arg2 = (Real *) 0 ; int arg3 ; Shape *result = 0 ; - - arg1 = (Vector_3 *) a_arg1; - - + + arg1 = (Vector_3 *) a_arg1; + + arg2 = (Real *) a_arg2; - - - - arg3 = (int) a_arg3; - - + + + + arg3 = (int) a_arg3; + + result = (Shape *)b2d_new_multiSphere(arg1,arg2,arg3); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -475,7 +475,7 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_multiSphere ( DllExport void * SWIGSTDCALL Ada_b2d_new_Plane ( void * a_arg1 , - + float a_arg2 ) { @@ -483,20 +483,20 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_Plane ( Vector_3 *arg1 = (Vector_3 *) 0 ; Real arg2 ; Shape *result = 0 ; - - arg1 = (Vector_3 *)a_arg1; - - - arg2 = (Real) a_arg2; - - + + arg1 = (Vector_3 *)a_arg1; + + + arg2 = (Real) a_arg2; + + result = (Shape *)b2d_new_Plane(arg1,arg2); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -508,18 +508,18 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_Sphere ( void * jresult ; Real arg1 ; Shape *result = 0 ; - - - arg1 = (Real) a_arg1; - - + + + arg1 = (Real) a_arg1; + + result = (Shape *)b2d_new_Sphere(arg1); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -529,12 +529,12 @@ DllExport void SWIGSTDCALL Ada_b2d_free_Shape ( ) { Shape *arg1 = (Shape *) 0 ; - - arg1 = (Shape *)a_arg1; - + + arg1 = (Shape *)a_arg1; + b2d_free_Shape(arg1); - - + + } @@ -546,16 +546,16 @@ DllExport void* SWIGSTDCALL Ada_b2d_Shape_user_Data ( void* jresult ; Shape *arg1 = (Shape *) 0 ; void *result = 0 ; - - arg1 = (Shape *)a_arg1; - + + arg1 = (Shape *)a_arg1; + result = (void *)b2d_Shape_user_Data(arg1); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -563,20 +563,20 @@ DllExport void* SWIGSTDCALL Ada_b2d_Shape_user_Data ( DllExport void SWIGSTDCALL Ada_b2d_Shape_user_Data_is ( void * a_arg1 , - + void* a_arg2 ) { Shape *arg1 = (Shape *) 0 ; void *arg2 = (void *) 0 ; - - arg1 = (Shape *)a_arg1; - - arg2 = (void *)a_arg2; - + + arg1 = (Shape *)a_arg1; + + arg2 = (void *)a_arg2; + b2d_Shape_user_Data_is(arg1,arg2); - - + + } @@ -584,25 +584,25 @@ DllExport void SWIGSTDCALL Ada_b2d_Shape_user_Data_is ( DllExport void SWIGSTDCALL Ada_b2d_shape_Scale_is ( void * a_arg1 , - + Vector_2 a_arg2 ) { Shape *arg1 = (Shape *) 0 ; Vector_2 arg2 ; Vector_2 *argp2 ; - - arg1 = (Shape *)a_arg1; - - - argp2 = (Vector_2 *) &a_arg2; - - arg2 = *argp2; - - + + arg1 = (Shape *)a_arg1; + + + argp2 = (Vector_2 *) &a_arg2; + + arg2 = *argp2; + + b2d_shape_Scale_is(arg1,arg2); - - + + } @@ -610,16 +610,16 @@ DllExport void SWIGSTDCALL Ada_b2d_shape_Scale_is ( DllExport void * SWIGSTDCALL Ada_b2d_new_Object ( void * a_arg1 , - + float a_arg2 , - + float a_arg3 , - + float a_arg4 , - + void * a_arg5 ) { @@ -630,30 +630,30 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_Object ( Real arg4 ; Shape *arg5 = (Shape *) 0 ; Object *result = 0 ; - - arg1 = (Vector_2 *)a_arg1; - - - arg2 = (Real) a_arg2; - - - - arg3 = (Real) a_arg3; - - - - arg4 = (Real) a_arg4; - - - arg5 = (Shape *)a_arg5; - + + arg1 = (Vector_2 *)a_arg1; + + + arg2 = (Real) a_arg2; + + + + arg3 = (Real) a_arg3; + + + + arg4 = (Real) a_arg4; + + + arg5 = (Shape *)a_arg5; + result = (Object *)b2d_new_Object(arg1,arg2,arg3,arg4,arg5); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -663,12 +663,12 @@ DllExport void SWIGSTDCALL Ada_b2d_free_Object ( ) { Object *arg1 = (Object *) 0 ; - - arg1 = (Object *)a_arg1; - + + arg1 = (Object *)a_arg1; + b2d_free_Object(arg1); - - + + } @@ -676,20 +676,20 @@ DllExport void SWIGSTDCALL Ada_b2d_free_Object ( DllExport void SWIGSTDCALL Ada_b2d_Object_Scale_is ( void * a_arg1 , - + void * a_arg2 ) { Object *arg1 = (Object *) 0 ; Vector_2 *arg2 = (Vector_2 *) 0 ; - - arg1 = (Object *)a_arg1; - - arg2 = (Vector_2 *)a_arg2; - + + arg1 = (Object *)a_arg1; + + arg2 = (Vector_2 *)a_arg2; + b2d_Object_Scale_is(arg1,arg2); - - + + } @@ -701,16 +701,16 @@ DllExport void * SWIGSTDCALL Ada_b2d_Object_Shape ( void * jresult ; Object *arg1 = (Object *) 0 ; Shape *result = 0 ; - - arg1 = (Object *)a_arg1; - + + arg1 = (Object *)a_arg1; + result = (Shape *)b2d_Object_Shape(arg1); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -722,16 +722,16 @@ DllExport void* SWIGSTDCALL Ada_b2d_Object_user_Data ( void* jresult ; Object *arg1 = (Object *) 0 ; void *result = 0 ; - - arg1 = (Object *)a_arg1; - + + arg1 = (Object *)a_arg1; + result = (void *)b2d_Object_user_Data(arg1); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -739,20 +739,20 @@ DllExport void* SWIGSTDCALL Ada_b2d_Object_user_Data ( DllExport void SWIGSTDCALL Ada_b2d_Object_user_Data_is ( void * a_arg1 , - + void* a_arg2 ) { Object *arg1 = (Object *) 0 ; void *arg2 = (void *) 0 ; - - arg1 = (Object *)a_arg1; - - arg2 = (void *)a_arg2; - + + arg1 = (Object *)a_arg1; + + arg2 = (void *)a_arg2; + b2d_Object_user_Data_is(arg1,arg2); - - + + } @@ -764,16 +764,16 @@ DllExport float SWIGSTDCALL Ada_b2d_Object_Mass ( float jresult ; Object *arg1 = (Object *) 0 ; Real result; - - arg1 = (Object *)a_arg1; - + + arg1 = (Object *)a_arg1; + result = (Real)b2d_Object_Mass(arg1); - jresult = result; - - - + jresult = result; + + + return jresult; - + } @@ -781,22 +781,22 @@ DllExport float SWIGSTDCALL Ada_b2d_Object_Mass ( DllExport void SWIGSTDCALL Ada_b2d_Object_Friction_is ( void * a_arg1 , - + float a_arg2 ) { Object *arg1 = (Object *) 0 ; Real arg2 ; - - arg1 = (Object *)a_arg1; - - - arg2 = (Real) a_arg2; - - + + arg1 = (Object *)a_arg1; + + + arg2 = (Real) a_arg2; + + b2d_Object_Friction_is(arg1,arg2); - - + + } @@ -804,22 +804,22 @@ DllExport void SWIGSTDCALL Ada_b2d_Object_Friction_is ( DllExport void SWIGSTDCALL Ada_b2d_Object_Restitution_is ( void * a_arg1 , - + float a_arg2 ) { Object *arg1 = (Object *) 0 ; Real arg2 ; - - arg1 = (Object *)a_arg1; - - - arg2 = (Real) a_arg2; - - + + arg1 = (Object *)a_arg1; + + + arg2 = (Real) a_arg2; + + b2d_Object_Restitution_is(arg1,arg2); - - + + } @@ -831,19 +831,19 @@ DllExport Vector_3 SWIGSTDCALL Ada_b2d_Object_Site ( Vector_3 jresult ; Object *arg1 = (Object *) 0 ; Vector_3 result; - - arg1 = (Object *)a_arg1; - + + arg1 = (Object *)a_arg1; + result = b2d_Object_Site(arg1); - - jresult = result; - //jresult = new Vector_3 ((Vector_3 &) result); - - - - + + jresult = result; + //jresult = new Vector_3 ((Vector_3 &) result); + + + + return jresult; - + } @@ -851,20 +851,20 @@ DllExport Vector_3 SWIGSTDCALL Ada_b2d_Object_Site ( DllExport void SWIGSTDCALL Ada_b2d_Object_Site_is ( void * a_arg1 , - + void * a_arg2 ) { Object *arg1 = (Object *) 0 ; Vector_3 *arg2 = (Vector_3 *) 0 ; - - arg1 = (Object *)a_arg1; - - arg2 = (Vector_3 *)a_arg2; - + + arg1 = (Object *)a_arg1; + + arg2 = (Vector_3 *)a_arg2; + b2d_Object_Site_is(arg1,arg2); - - + + } @@ -876,19 +876,19 @@ DllExport Matrix_3x3 SWIGSTDCALL Ada_b2d_Object_Spin ( Matrix_3x3 jresult ; Object *arg1 = (Object *) 0 ; Matrix_3x3 result; - - arg1 = (Object *)a_arg1; - + + arg1 = (Object *)a_arg1; + result = b2d_Object_Spin(arg1); - - jresult = result; - //jresult = new Matrix_3x3 ((Matrix_3x3 &) result); - - - - + + jresult = result; + //jresult = new Matrix_3x3 ((Matrix_3x3 &) result); + + + + return jresult; - + } @@ -896,20 +896,20 @@ DllExport Matrix_3x3 SWIGSTDCALL Ada_b2d_Object_Spin ( DllExport void SWIGSTDCALL Ada_b2d_Object_Spin_is ( void * a_arg1 , - + void * a_arg2 ) { Object *arg1 = (Object *) 0 ; Matrix_3x3 *arg2 = (Matrix_3x3 *) 0 ; - - arg1 = (Object *)a_arg1; - - arg2 = (Matrix_3x3 *)a_arg2; - + + arg1 = (Object *)a_arg1; + + arg2 = (Matrix_3x3 *)a_arg2; + b2d_Object_Spin_is(arg1,arg2); - - + + } @@ -921,16 +921,16 @@ DllExport float SWIGSTDCALL Ada_b2d_Object_xy_Spin ( float jresult ; Object *arg1 = (Object *) 0 ; Real result; - - arg1 = (Object *)a_arg1; - + + arg1 = (Object *)a_arg1; + result = (Real)b2d_Object_xy_Spin(arg1); - jresult = result; - - - + jresult = result; + + + return jresult; - + } @@ -938,22 +938,22 @@ DllExport float SWIGSTDCALL Ada_b2d_Object_xy_Spin ( DllExport void SWIGSTDCALL Ada_b2d_Object_xy_Spin_is ( void * a_arg1 , - + float a_arg2 ) { Object *arg1 = (Object *) 0 ; Real arg2 ; - - arg1 = (Object *)a_arg1; - - - arg2 = (Real) a_arg2; - - + + arg1 = (Object *)a_arg1; + + + arg2 = (Real) a_arg2; + + b2d_Object_xy_Spin_is(arg1,arg2); - - + + } @@ -965,19 +965,19 @@ DllExport Matrix_4x4 SWIGSTDCALL Ada_b2d_Object_Transform ( Matrix_4x4 jresult ; Object *arg1 = (Object *) 0 ; Matrix_4x4 result; - - arg1 = (Object *)a_arg1; - + + arg1 = (Object *)a_arg1; + result = b2d_Object_Transform(arg1); - - jresult = result; - //jresult = new Matrix_4x4 ((Matrix_4x4 &) result); - - - - + + jresult = result; + //jresult = new Matrix_4x4 ((Matrix_4x4 &) result); + + + + return jresult; - + } @@ -985,20 +985,20 @@ DllExport Matrix_4x4 SWIGSTDCALL Ada_b2d_Object_Transform ( DllExport void SWIGSTDCALL Ada_b2d_Object_Transform_is ( void * a_arg1 , - + void * a_arg2 ) { Object *arg1 = (Object *) 0 ; Matrix_4x4 *arg2 = (Matrix_4x4 *) 0 ; - - arg1 = (Object *)a_arg1; - - arg2 = (Matrix_4x4 *)a_arg2; - + + arg1 = (Object *)a_arg1; + + arg2 = (Matrix_4x4 *)a_arg2; + b2d_Object_Transform_is(arg1,arg2); - - + + } @@ -1010,19 +1010,19 @@ DllExport Vector_3 SWIGSTDCALL Ada_b2d_Object_Speed ( Vector_3 jresult ; Object *arg1 = (Object *) 0 ; Vector_3 result; - - arg1 = (Object *)a_arg1; - + + arg1 = (Object *)a_arg1; + result = b2d_Object_Speed(arg1); - - jresult = result; - //jresult = new Vector_3 ((Vector_3 &) result); - - - - + + jresult = result; + //jresult = new Vector_3 ((Vector_3 &) result); + + + + return jresult; - + } @@ -1030,20 +1030,20 @@ DllExport Vector_3 SWIGSTDCALL Ada_b2d_Object_Speed ( DllExport void SWIGSTDCALL Ada_b2d_Object_Speed_is ( void * a_arg1 , - + void * a_arg2 ) { Object *arg1 = (Object *) 0 ; Vector_3 *arg2 = (Vector_3 *) 0 ; - - arg1 = (Object *)a_arg1; - - arg2 = (Vector_3 *)a_arg2; - + + arg1 = (Object *)a_arg1; + + arg2 = (Vector_3 *)a_arg2; + b2d_Object_Speed_is(arg1,arg2); - - + + } @@ -1055,19 +1055,19 @@ DllExport Vector_3 SWIGSTDCALL Ada_b2d_Object_Gyre ( Vector_3 jresult ; Object *arg1 = (Object *) 0 ; Vector_3 result; - - arg1 = (Object *)a_arg1; - + + arg1 = (Object *)a_arg1; + result = b2d_Object_Gyre(arg1); - - jresult = result; - //jresult = new Vector_3 ((Vector_3 &) result); - - - - + + jresult = result; + //jresult = new Vector_3 ((Vector_3 &) result); + + + + return jresult; - + } @@ -1075,20 +1075,20 @@ DllExport Vector_3 SWIGSTDCALL Ada_b2d_Object_Gyre ( DllExport void SWIGSTDCALL Ada_b2d_Object_Gyre_is ( void * a_arg1 , - + void * a_arg2 ) { Object *arg1 = (Object *) 0 ; Vector_3 *arg2 = (Vector_3 *) 0 ; - - arg1 = (Object *)a_arg1; - - arg2 = (Vector_3 *)a_arg2; - + + arg1 = (Object *)a_arg1; + + arg2 = (Vector_3 *)a_arg2; + b2d_Object_Gyre_is(arg1,arg2); - - + + } @@ -1096,20 +1096,20 @@ DllExport void SWIGSTDCALL Ada_b2d_Object_Gyre_is ( DllExport void SWIGSTDCALL Ada_b2d_Object_apply_Force ( void * a_arg1 , - + void * a_arg2 ) { Object *arg1 = (Object *) 0 ; Vector_3 *arg2 = (Vector_3 *) 0 ; - - arg1 = (Object *)a_arg1; - - arg2 = (Vector_3 *)a_arg2; - + + arg1 = (Object *)a_arg1; + + arg2 = (Vector_3 *)a_arg2; + b2d_Object_apply_Force(arg1,arg2); - - + + } @@ -1117,20 +1117,20 @@ DllExport void SWIGSTDCALL Ada_b2d_Object_apply_Force ( DllExport void SWIGSTDCALL Ada_b2d_Object_apply_Torque ( void * a_arg1 , - + void * a_arg2 ) { Object *arg1 = (Object *) 0 ; Vector_3 *arg2 = (Vector_3 *) 0 ; - - arg1 = (Object *)a_arg1; - - arg2 = (Vector_3 *)a_arg2; - + + arg1 = (Object *)a_arg1; + + arg2 = (Vector_3 *)a_arg2; + b2d_Object_apply_Torque(arg1,arg2); - - + + } @@ -1138,20 +1138,20 @@ DllExport void SWIGSTDCALL Ada_b2d_Object_apply_Torque ( DllExport void SWIGSTDCALL Ada_b2d_Object_apply_Torque_impulse ( void * a_arg1 , - + void * a_arg2 ) { Object *arg1 = (Object *) 0 ; Vector_3 *arg2 = (Vector_3 *) 0 ; - - arg1 = (Object *)a_arg1; - - arg2 = (Vector_3 *)a_arg2; - + + arg1 = (Object *)a_arg1; + + arg2 = (Vector_3 *)a_arg2; + b2d_Object_apply_Torque_impulse(arg1,arg2); - - + + } @@ -1161,12 +1161,12 @@ DllExport void SWIGSTDCALL Ada_b2d_dump ( ) { Object *arg1 = (Object *) 0 ; - - arg1 = (Object *)a_arg1; - + + arg1 = (Object *)a_arg1; + b2d_dump(arg1); - - + + } @@ -1174,25 +1174,25 @@ DllExport void SWIGSTDCALL Ada_b2d_dump ( DllExport void * SWIGSTDCALL Ada_b2d_new_hinge_Joint_with_local_anchors ( void * a_arg1 , - + void * a_arg2 , - + void * a_arg3 , - + void * a_arg4 , - + void * a_arg5 , - + float a_arg6 , - + float a_arg7 , - + unsigned int a_arg8 ) { @@ -1206,36 +1206,36 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_hinge_Joint_with_local_anchors ( float arg7 ; bool arg8 ; Joint *result = 0 ; - - arg1 = (Space *)a_arg1; - - arg2 = (Object *)a_arg2; - - arg3 = (Object *)a_arg3; - - arg4 = (Vector_3 *)a_arg4; - - arg5 = (Vector_3 *)a_arg5; - - - arg6 = (float) a_arg6; - - - - arg7 = (float) a_arg7; - - - - arg8 = a_arg8 ? true : false; - - + + arg1 = (Space *)a_arg1; + + arg2 = (Object *)a_arg2; + + arg3 = (Object *)a_arg3; + + arg4 = (Vector_3 *)a_arg4; + + arg5 = (Vector_3 *)a_arg5; + + + arg6 = (float) a_arg6; + + + + arg7 = (float) a_arg7; + + + + arg8 = a_arg8 ? true : false; + + result = (Joint *)b2d_new_hinge_Joint_with_local_anchors(arg1,arg2,arg3,arg4,arg5,arg6,arg7,arg8); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -1243,25 +1243,25 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_hinge_Joint_with_local_anchors ( DllExport void * SWIGSTDCALL Ada_b2d_new_hinge_Joint ( void * a_arg1 , - + void * a_arg2 , - + void * a_arg3 , - + void * a_arg4 , - + void * a_arg5 , - + float a_arg6 , - + float a_arg7 , - + unsigned int a_arg8 ) { @@ -1275,36 +1275,36 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_hinge_Joint ( float arg7 ; bool arg8 ; Joint *result = 0 ; - - arg1 = (Space *)a_arg1; - - arg2 = (Object *)a_arg2; - - arg3 = (Object *)a_arg3; - - arg4 = (Matrix_4x4 *)a_arg4; - - arg5 = (Matrix_4x4 *)a_arg5; - - - arg6 = (float) a_arg6; - - - - arg7 = (float) a_arg7; - - - - arg8 = a_arg8 ? true : false; - - + + arg1 = (Space *)a_arg1; + + arg2 = (Object *)a_arg2; + + arg3 = (Object *)a_arg3; + + arg4 = (Matrix_4x4 *)a_arg4; + + arg5 = (Matrix_4x4 *)a_arg5; + + + arg6 = (float) a_arg6; + + + + arg7 = (float) a_arg7; + + + + arg8 = a_arg8 ? true : false; + + result = (Joint *)b2d_new_hinge_Joint(arg1,arg2,arg3,arg4,arg5,arg6,arg7,arg8); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -1314,12 +1314,12 @@ DllExport void SWIGSTDCALL Ada_b2d_free_hinge_Joint ( ) { Joint *arg1 = (Joint *) 0 ; - - arg1 = (Joint *)a_arg1; - + + arg1 = (Joint *)a_arg1; + b2d_free_hinge_Joint(arg1); - - + + } @@ -1327,26 +1327,32 @@ DllExport void SWIGSTDCALL Ada_b2d_free_hinge_Joint ( DllExport void * SWIGSTDCALL Ada_b2d_new_space_hinge_Joint ( void * a_arg1 , - + void * a_arg2 + , + + void * a_arg3 ) { void * jresult ; - Object *arg1 = (Object *) 0 ; - Matrix_4x4 *arg2 = (Matrix_4x4 *) 0 ; + Space *arg1 = (Space *) 0 ; + Object *arg2 = (Object *) 0 ; + Matrix_4x4 *arg3 = (Matrix_4x4 *) 0 ; Joint *result = 0 ; - - arg1 = (Object *)a_arg1; - - arg2 = (Matrix_4x4 *)a_arg2; - - result = (Joint *)b2d_new_space_hinge_Joint(arg1,arg2); - jresult = (void *) result; - - - + + arg1 = (Space *)a_arg1; + + arg2 = (Object *)a_arg2; + + arg3 = (Matrix_4x4 *)a_arg3; + + result = (Joint *)b2d_new_space_hinge_Joint(arg1,arg2,arg3); + jresult = (void *) result; + + + return jresult; - + } @@ -1354,13 +1360,13 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_space_hinge_Joint ( DllExport void * SWIGSTDCALL Ada_b2d_new_DoF6_Joint ( void * a_arg1 , - + void * a_arg2 , - + void * a_arg3 , - + void * a_arg4 ) { @@ -1370,22 +1376,22 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_DoF6_Joint ( Matrix_4x4 *arg3 = (Matrix_4x4 *) 0 ; Matrix_4x4 *arg4 = (Matrix_4x4 *) 0 ; Joint *result = 0 ; - - arg1 = (Object *)a_arg1; - - arg2 = (Object *)a_arg2; - - arg3 = (Matrix_4x4 *)a_arg3; - - arg4 = (Matrix_4x4 *)a_arg4; - + + arg1 = (Object *)a_arg1; + + arg2 = (Object *)a_arg2; + + arg3 = (Matrix_4x4 *)a_arg3; + + arg4 = (Matrix_4x4 *)a_arg4; + result = (Joint *)b2d_new_DoF6_Joint(arg1,arg2,arg3,arg4); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -1393,13 +1399,13 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_DoF6_Joint ( DllExport void * SWIGSTDCALL Ada_b2d_new_cone_twist_Joint ( void * a_arg1 , - + void * a_arg2 , - + void * a_arg3 , - + void * a_arg4 ) { @@ -1409,22 +1415,22 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_cone_twist_Joint ( Matrix_4x4 *arg3 = (Matrix_4x4 *) 0 ; Matrix_4x4 *arg4 = (Matrix_4x4 *) 0 ; Joint *result = 0 ; - - arg1 = (Object *)a_arg1; - - arg2 = (Object *)a_arg2; - - arg3 = (Matrix_4x4 *)a_arg3; - - arg4 = (Matrix_4x4 *)a_arg4; - + + arg1 = (Object *)a_arg1; + + arg2 = (Object *)a_arg2; + + arg3 = (Matrix_4x4 *)a_arg3; + + arg4 = (Matrix_4x4 *)a_arg4; + result = (Joint *)b2d_new_cone_twist_Joint(arg1,arg2,arg3,arg4); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -1432,13 +1438,13 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_cone_twist_Joint ( DllExport void * SWIGSTDCALL Ada_b2d_new_slider_Joint ( void * a_arg1 , - + void * a_arg2 , - + void * a_arg3 , - + void * a_arg4 ) { @@ -1448,22 +1454,22 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_slider_Joint ( Matrix_4x4 *arg3 = (Matrix_4x4 *) 0 ; Matrix_4x4 *arg4 = (Matrix_4x4 *) 0 ; Joint *result = 0 ; - - arg1 = (Object *)a_arg1; - - arg2 = (Object *)a_arg2; - - arg3 = (Matrix_4x4 *)a_arg3; - - arg4 = (Matrix_4x4 *)a_arg4; - + + arg1 = (Object *)a_arg1; + + arg2 = (Object *)a_arg2; + + arg3 = (Matrix_4x4 *)a_arg3; + + arg4 = (Matrix_4x4 *)a_arg4; + result = (Joint *)b2d_new_slider_Joint(arg1,arg2,arg3,arg4); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -1471,13 +1477,13 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_slider_Joint ( DllExport void * SWIGSTDCALL Ada_b2d_new_ball_Joint ( void * a_arg1 , - + void * a_arg2 , - + void * a_arg3 , - + void * a_arg4 ) { @@ -1487,22 +1493,22 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_ball_Joint ( Vector_3 *arg3 = (Vector_3 *) 0 ; Vector_3 *arg4 = (Vector_3 *) 0 ; Joint *result = 0 ; - - arg1 = (Object *)a_arg1; - - arg2 = (Object *)a_arg2; - - arg3 = (Vector_3 *)a_arg3; - - arg4 = (Vector_3 *)a_arg4; - + + arg1 = (Object *)a_arg1; + + arg2 = (Object *)a_arg2; + + arg3 = (Vector_3 *)a_arg3; + + arg4 = (Vector_3 *)a_arg4; + result = (Joint *)b2d_new_ball_Joint(arg1,arg2,arg3,arg4); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -1514,39 +1520,39 @@ DllExport void* SWIGSTDCALL Ada_b2d_Joint_user_Data ( void* jresult ; Joint *arg1 = (Joint *) 0 ; void *result = 0 ; - - arg1 = (Joint *)a_arg1; - + + arg1 = (Joint *)a_arg1; + result = (void *)b2d_Joint_user_Data(arg1); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } -/* RAK -DllExport void SWIGSTDCALL Ada_b2d_Joint_user_Data_is ( - void * a_arg1 - , - - void* a_arg2 - ) -{ - Joint *arg1 = (Joint *) 0 ; - void *arg2 = (void *) 0 ; - - arg1 = (Joint *)a_arg1; - - arg2 = (void *)a_arg2; - - b2d_Joint_user_Data_is(arg1,arg2); - - -} -*/ + +// DllExport void SWIGSTDCALL Ada_b2d_Joint_user_Data_is ( +// void * a_arg1 +// , +// +// void* a_arg2 +// ) +// { +// Joint *arg1 = (Joint *) 0 ; +// void *arg2 = (void *) 0 ; +// +// arg1 = (Joint *)a_arg1; +// +// arg2 = (void *)a_arg2; +// +// b2d_Joint_user_Data_is(arg1,arg2); +// +// +// } + DllExport void * SWIGSTDCALL Ada_b2d_Joint_Object_A ( @@ -1556,16 +1562,16 @@ DllExport void * SWIGSTDCALL Ada_b2d_Joint_Object_A ( void * jresult ; Joint *arg1 = (Joint *) 0 ; Object *result = 0 ; - - arg1 = (Joint *)a_arg1; - + + arg1 = (Joint *)a_arg1; + result = (Object *)b2d_Joint_Object_A(arg1); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -1577,16 +1583,16 @@ DllExport void * SWIGSTDCALL Ada_b2d_Joint_Object_B ( void * jresult ; Joint *arg1 = (Joint *) 0 ; Object *result = 0 ; - - arg1 = (Joint *)a_arg1; - + + arg1 = (Joint *)a_arg1; + result = (Object *)b2d_Joint_Object_B(arg1); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -1598,19 +1604,19 @@ DllExport Matrix_4x4 SWIGSTDCALL Ada_b2d_Joint_Frame_A ( Matrix_4x4 jresult ; Joint *arg1 = (Joint *) 0 ; Matrix_4x4 result; - - arg1 = (Joint *)a_arg1; - + + arg1 = (Joint *)a_arg1; + result = b2d_Joint_Frame_A(arg1); - - jresult = result; - //jresult = new Matrix_4x4 ((Matrix_4x4 &) result); - - - - + + jresult = result; + //jresult = new Matrix_4x4 ((Matrix_4x4 &) result); + + + + return jresult; - + } @@ -1622,19 +1628,19 @@ DllExport Matrix_4x4 SWIGSTDCALL Ada_b2d_Joint_Frame_B ( Matrix_4x4 jresult ; Joint *arg1 = (Joint *) 0 ; Matrix_4x4 result; - - arg1 = (Joint *)a_arg1; - + + arg1 = (Joint *)a_arg1; + result = b2d_Joint_Frame_B(arg1); - - jresult = result; - //jresult = new Matrix_4x4 ((Matrix_4x4 &) result); - - - - + + jresult = result; + //jresult = new Matrix_4x4 ((Matrix_4x4 &) result); + + + + return jresult; - + } @@ -1642,20 +1648,20 @@ DllExport Matrix_4x4 SWIGSTDCALL Ada_b2d_Joint_Frame_B ( DllExport void SWIGSTDCALL Ada_b2d_Joint_Frame_A_is ( void * a_arg1 , - + void * a_arg2 ) { Joint *arg1 = (Joint *) 0 ; Matrix_4x4 *arg2 = (Matrix_4x4 *) 0 ; - - arg1 = (Joint *)a_arg1; - - arg2 = (Matrix_4x4 *)a_arg2; - + + arg1 = (Joint *)a_arg1; + + arg2 = (Matrix_4x4 *)a_arg2; + b2d_Joint_Frame_A_is(arg1,arg2); - - + + } @@ -1663,20 +1669,20 @@ DllExport void SWIGSTDCALL Ada_b2d_Joint_Frame_A_is ( DllExport void SWIGSTDCALL Ada_b2d_Joint_Frame_B_is ( void * a_arg1 , - + void * a_arg2 ) { Joint *arg1 = (Joint *) 0 ; Matrix_4x4 *arg2 = (Matrix_4x4 *) 0 ; - - arg1 = (Joint *)a_arg1; - - arg2 = (Matrix_4x4 *)a_arg2; - + + arg1 = (Joint *)a_arg1; + + arg2 = (Matrix_4x4 *)a_arg2; + b2d_Joint_Frame_B_is(arg1,arg2); - - + + } @@ -1684,28 +1690,28 @@ DllExport void SWIGSTDCALL Ada_b2d_Joint_Frame_B_is ( DllExport void SWIGSTDCALL Ada_b2d_Joint_set_local_Anchor ( void * a_arg1 , - + unsigned int a_arg2 , - + void * a_arg3 ) { Joint *arg1 = (Joint *) 0 ; bool arg2 ; Vector_3 *arg3 = (Vector_3 *) 0 ; - - arg1 = (Joint *)a_arg1; - - - arg2 = a_arg2 ? true : false; - - - arg3 = (Vector_3 *)a_arg3; - + + arg1 = (Joint *)a_arg1; + + + arg2 = a_arg2 ? true : false; + + + arg3 = (Vector_3 *)a_arg3; + b2d_Joint_set_local_Anchor(arg1,arg2,arg3); - - + + } @@ -1713,7 +1719,7 @@ DllExport void SWIGSTDCALL Ada_b2d_Joint_set_local_Anchor ( DllExport unsigned int SWIGSTDCALL Ada_b2d_Joint_is_Limited ( void * a_arg1 , - + int a_arg2 ) { @@ -1721,20 +1727,20 @@ DllExport unsigned int SWIGSTDCALL Ada_b2d_Joint_is_Limited ( Joint *arg1 = (Joint *) 0 ; int arg2 ; bool result; - - arg1 = (Joint *)a_arg1; - - - arg2 = (int) a_arg2; - - + + arg1 = (Joint *)a_arg1; + + + arg2 = (int) a_arg2; + + result = (bool)b2d_Joint_is_Limited(arg1,arg2); - jresult = result; - - - + jresult = result; + + + return jresult; - + } @@ -1742,7 +1748,7 @@ DllExport unsigned int SWIGSTDCALL Ada_b2d_Joint_is_Limited ( DllExport unsigned int SWIGSTDCALL Ada_b2d_Joint_Extent ( void * a_arg1 , - + int a_arg2 ) { @@ -1750,20 +1756,20 @@ DllExport unsigned int SWIGSTDCALL Ada_b2d_Joint_Extent ( Joint *arg1 = (Joint *) 0 ; int arg2 ; bool result; - - arg1 = (Joint *)a_arg1; - - - arg2 = (int) a_arg2; - - + + arg1 = (Joint *)a_arg1; + + + arg2 = (int) a_arg2; + + result = (bool)b2d_Joint_Extent(arg1,arg2); - jresult = result; - - - + jresult = result; + + + return jresult; - + } @@ -1771,30 +1777,30 @@ DllExport unsigned int SWIGSTDCALL Ada_b2d_Joint_Extent ( DllExport void SWIGSTDCALL Ada_b2d_Joint_Velocity_is ( void * a_arg1 , - + int a_arg2 , - + float a_arg3 ) { Joint *arg1 = (Joint *) 0 ; int arg2 ; Real arg3 ; - - arg1 = (Joint *)a_arg1; - - - arg2 = (int) a_arg2; - - - - arg3 = (Real) a_arg3; - - + + arg1 = (Joint *)a_arg1; + + + arg2 = (int) a_arg2; + + + + arg3 = (Real) a_arg3; + + b2d_Joint_Velocity_is(arg1,arg2,arg3); - - + + } @@ -1806,19 +1812,19 @@ DllExport Vector_3 SWIGSTDCALL Ada_b2d_Joint_reaction_Force ( Vector_3 jresult ; Joint *arg1 = (Joint *) 0 ; Vector_3 result; - - arg1 = (Joint *)a_arg1; - + + arg1 = (Joint *)a_arg1; + result = b2d_Joint_reaction_Force(arg1); - - jresult = result; - //jresult = new Vector_3 ((Vector_3 &) result); - - - - + + jresult = result; + //jresult = new Vector_3 ((Vector_3 &) result); + + + + return jresult; - + } @@ -1830,16 +1836,16 @@ DllExport float SWIGSTDCALL Ada_b2d_Joint_reaction_Torque ( float jresult ; Joint *arg1 = (Joint *) 0 ; Real result; - - arg1 = (Joint *)a_arg1; - + + arg1 = (Joint *)a_arg1; + result = (Real)b2d_Joint_reaction_Torque(arg1); - jresult = result; - - - + jresult = result; + + + return jresult; - + } @@ -1847,30 +1853,30 @@ DllExport float SWIGSTDCALL Ada_b2d_Joint_reaction_Torque ( DllExport void SWIGSTDCALL Ada_b2d_Joint_hinge_Limits_are ( void * a_arg1 , - + float a_arg2 , - + float a_arg3 ) { Joint *arg1 = (Joint *) 0 ; Real arg2 ; Real arg3 ; - - arg1 = (Joint *)a_arg1; - - - arg2 = (Real) a_arg2; - - - - arg3 = (Real) a_arg3; - - + + arg1 = (Joint *)a_arg1; + + + arg2 = (Real) a_arg2; + + + + arg3 = (Real) a_arg3; + + b2d_Joint_hinge_Limits_are(arg1,arg2,arg3); - - + + } @@ -1880,14 +1886,14 @@ DllExport void * SWIGSTDCALL Ada_b2d_new_Space ( { void * jresult ; Space *result = 0 ; - + result = (Space *)b2d_new_Space(); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -1897,12 +1903,12 @@ DllExport void SWIGSTDCALL Ada_b2d_free_Space ( ) { Space *arg1 = (Space *) 0 ; - - arg1 = (Space *)a_arg1; - + + arg1 = (Space *)a_arg1; + b2d_free_Space(arg1); - - + + } @@ -1910,20 +1916,20 @@ DllExport void SWIGSTDCALL Ada_b2d_free_Space ( DllExport void SWIGSTDCALL Ada_b2d_Space_add_Object ( void * a_arg1 , - + void * a_arg2 ) { Space *arg1 = (Space *) 0 ; Object *arg2 = (Object *) 0 ; - - arg1 = (Space *)a_arg1; - - arg2 = (Object *)a_arg2; - + + arg1 = (Space *)a_arg1; + + arg2 = (Object *)a_arg2; + b2d_Space_add_Object(arg1,arg2); - - + + } @@ -1931,20 +1937,20 @@ DllExport void SWIGSTDCALL Ada_b2d_Space_add_Object ( DllExport void SWIGSTDCALL Ada_b2d_Space_rid_Object ( void * a_arg1 , - + void * a_arg2 ) { Space *arg1 = (Space *) 0 ; Object *arg2 = (Object *) 0 ; - - arg1 = (Space *)a_arg1; - - arg2 = (Object *)a_arg2; - + + arg1 = (Space *)a_arg1; + + arg2 = (Object *)a_arg2; + b2d_Space_rid_Object(arg1,arg2); - - + + } @@ -1952,20 +1958,20 @@ DllExport void SWIGSTDCALL Ada_b2d_Space_rid_Object ( DllExport void SWIGSTDCALL Ada_b2d_Space_add_Joint ( void * a_arg1 , - + void * a_arg2 ) { Space *arg1 = (Space *) 0 ; Joint *arg2 = (Joint *) 0 ; - - arg1 = (Space *)a_arg1; - - arg2 = (Joint *)a_arg2; - + + arg1 = (Space *)a_arg1; + + arg2 = (Joint *)a_arg2; + b2d_Space_add_Joint(arg1,arg2); - - + + } @@ -1973,20 +1979,20 @@ DllExport void SWIGSTDCALL Ada_b2d_Space_add_Joint ( DllExport void SWIGSTDCALL Ada_b2d_Space_rid_Joint ( void * a_arg1 , - + void * a_arg2 ) { Space *arg1 = (Space *) 0 ; Joint *arg2 = (Joint *) 0 ; - - arg1 = (Space *)a_arg1; - - arg2 = (Joint *)a_arg2; - + + arg1 = (Space *)a_arg1; + + arg2 = (Joint *)a_arg2; + b2d_Space_rid_Joint(arg1,arg2); - - + + } @@ -1998,16 +2004,16 @@ DllExport void* SWIGSTDCALL Ada_b2d_b2Joint_user_Data ( void* jresult ; b2Joint *arg1 = (b2Joint *) 0 ; void *result = 0 ; - - arg1 = (b2Joint *)a_arg1; - + + arg1 = (b2Joint *)a_arg1; + result = (void *)b2d_b2Joint_user_Data(arg1); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -2017,12 +2023,12 @@ DllExport void SWIGSTDCALL Ada_delete_joint_Cursor ( ) { joint_Cursor *arg1 = (joint_Cursor *) 0 ; - - arg1 = (joint_Cursor *)a_arg1; - + + arg1 = (joint_Cursor *)a_arg1; + delete arg1; - - + + } @@ -2034,19 +2040,19 @@ DllExport joint_Cursor SWIGSTDCALL Ada_b2d_Space_first_Joint ( joint_Cursor jresult ; Space *arg1 = (Space *) 0 ; joint_Cursor result; - - arg1 = (Space *)a_arg1; - + + arg1 = (Space *)a_arg1; + result = b2d_Space_first_Joint(arg1); - - jresult = result; - //jresult = new joint_Cursor ((joint_Cursor &) result); - - - - + + jresult = result; + //jresult = new joint_Cursor ((joint_Cursor &) result); + + + + return jresult; - + } @@ -2056,12 +2062,12 @@ DllExport void SWIGSTDCALL Ada_b2d_Space_next_Joint ( ) { joint_Cursor *arg1 = (joint_Cursor *) 0 ; - - arg1 = (joint_Cursor *)a_arg1; - + + arg1 = (joint_Cursor *)a_arg1; + b2d_Space_next_Joint(arg1); - - + + } @@ -2073,16 +2079,16 @@ DllExport void * SWIGSTDCALL Ada_b2d_Space_joint_Element ( void * jresult ; joint_Cursor *arg1 = (joint_Cursor *) 0 ; b2Joint *result = 0 ; - - arg1 = (joint_Cursor *)a_arg1; - + + arg1 = (joint_Cursor *)a_arg1; + result = (b2Joint *)b2d_Space_joint_Element(arg1); - jresult = (void *) result; - - - + jresult = (void *) result; + + + return jresult; - + } @@ -2090,20 +2096,20 @@ DllExport void * SWIGSTDCALL Ada_b2d_Space_joint_Element ( DllExport void SWIGSTDCALL Ada_b2d_Space_Gravity_is ( void * a_arg1 , - + void * a_arg2 ) { Space *arg1 = (Space *) 0 ; Vector_3 *arg2 = (Vector_3 *) 0 ; - - arg1 = (Space *)a_arg1; - - arg2 = (Vector_3 *)a_arg2; - + + arg1 = (Space *)a_arg1; + + arg2 = (Vector_3 *)a_arg2; + b2d_Space_Gravity_is(arg1,arg2); - - + + } @@ -2111,22 +2117,22 @@ DllExport void SWIGSTDCALL Ada_b2d_Space_Gravity_is ( DllExport void SWIGSTDCALL Ada_b2d_Space_evolve ( void * a_arg1 , - + float a_arg2 ) { Space *arg1 = (Space *) 0 ; float arg2 ; - - arg1 = (Space *)a_arg1; - - - arg2 = (float) a_arg2; - - + + arg1 = (Space *)a_arg1; + + + arg2 = (float) a_arg2; + + b2d_Space_evolve(arg1,arg2); - - + + } @@ -2136,12 +2142,12 @@ DllExport void SWIGSTDCALL Ada_delete_b2d_ray_Collision ( ) { b2d_ray_Collision *arg1 = (b2d_ray_Collision *) 0 ; - - arg1 = (b2d_ray_Collision *)a_arg1; - + + arg1 = (b2d_ray_Collision *)a_arg1; + delete arg1; - - + + } @@ -2149,10 +2155,10 @@ DllExport void SWIGSTDCALL Ada_delete_b2d_ray_Collision ( DllExport b2d_ray_Collision SWIGSTDCALL Ada_b2d_Space_cast_Ray ( void * a_arg1 , - + void * a_arg2 , - + void * a_arg3 ) { @@ -2161,23 +2167,23 @@ DllExport b2d_ray_Collision SWIGSTDCALL Ada_b2d_Space_cast_Ray ( Vector_3 *arg2 = (Vector_3 *) 0 ; Vector_3 *arg3 = (Vector_3 *) 0 ; b2d_ray_Collision result; - - arg1 = (Space *)a_arg1; - - arg2 = (Vector_3 *)a_arg2; - - arg3 = (Vector_3 *)a_arg3; - + + arg1 = (Space *)a_arg1; + + arg2 = (Vector_3 *)a_arg2; + + arg3 = (Vector_3 *)a_arg3; + result = b2d_Space_cast_Ray(arg1,arg2,arg3); - - jresult = result; - //jresult = new b2d_ray_Collision ((b2d_ray_Collision &) result); - - - - + + jresult = result; + //jresult = new b2d_ray_Collision ((b2d_ray_Collision &) result); + + + + return jresult; - + } @@ -2187,12 +2193,12 @@ DllExport void SWIGSTDCALL Ada_delete_b2d_point_Collision ( ) { b2d_point_Collision *arg1 = (b2d_point_Collision *) 0 ; - - arg1 = (b2d_point_Collision *)a_arg1; - + + arg1 = (b2d_point_Collision *)a_arg1; + delete arg1; - - + + } @@ -2200,7 +2206,7 @@ DllExport void SWIGSTDCALL Ada_delete_b2d_point_Collision ( DllExport b2d_point_Collision SWIGSTDCALL Ada_b2d_Space_cast_Point ( void * a_arg1 , - + void * a_arg2 ) { @@ -2208,21 +2214,21 @@ DllExport b2d_point_Collision SWIGSTDCALL Ada_b2d_Space_cast_Point ( Space *arg1 = (Space *) 0 ; Vector_3 *arg2 = (Vector_3 *) 0 ; b2d_point_Collision result; - - arg1 = (Space *)a_arg1; - - arg2 = (Vector_3 *)a_arg2; - + + arg1 = (Space *)a_arg1; + + arg2 = (Vector_3 *)a_arg2; + result = b2d_Space_cast_Point(arg1,arg2); - - jresult = result; - //jresult = new b2d_point_Collision ((b2d_point_Collision &) result); - - - - + + jresult = result; + //jresult = new b2d_point_Collision ((b2d_point_Collision &) result); + + + + return jresult; - + } @@ -2232,12 +2238,12 @@ DllExport void SWIGSTDCALL Ada_delete_b2d_Contact ( ) { b2d_Contact *arg1 = (b2d_Contact *) 0 ; - - arg1 = (b2d_Contact *)a_arg1; - + + arg1 = (b2d_Contact *)a_arg1; + delete arg1; - - + + } @@ -2249,16 +2255,16 @@ DllExport int SWIGSTDCALL Ada_b2d_space_contact_Count ( int jresult ; Space *arg1 = (Space *) 0 ; int result; - - arg1 = (Space *)a_arg1; - + + arg1 = (Space *)a_arg1; + result = (int)b2d_space_contact_Count(arg1); - jresult = result; - - - + jresult = result; + + + return jresult; - + } @@ -2266,7 +2272,7 @@ DllExport int SWIGSTDCALL Ada_b2d_space_contact_Count ( DllExport b2d_Contact SWIGSTDCALL Ada_b2d_space_Contact ( void * a_arg1 , - + int a_arg2 ) { @@ -2274,23 +2280,23 @@ DllExport b2d_Contact SWIGSTDCALL Ada_b2d_space_Contact ( Space *arg1 = (Space *) 0 ; int arg2 ; b2d_Contact result; - - arg1 = (Space *)a_arg1; - - - arg2 = (int) a_arg2; - - + + arg1 = (Space *)a_arg1; + + + arg2 = (int) a_arg2; + + result = b2d_space_Contact(arg1,arg2); - - jresult = result; - //jresult = new b2d_Contact ((b2d_Contact &) result); - - - - + + jresult = result; + //jresult = new b2d_Contact ((b2d_Contact &) result); + + + + return jresult; - + } diff --git a/4-high/gel/source/joint/gel-hinge_joint.adb b/4-high/gel/source/joint/gel-hinge_joint.adb index fe4a059..8b59253 100644 --- a/4-high/gel/source/joint/gel-hinge_joint.adb +++ b/4-high/gel/source/joint/gel-hinge_joint.adb @@ -225,6 +225,8 @@ is Self.Softness := Softness; Self.bias_Factor := bias_Factor; Self.relaxation_Factor := relaxation_Factor; + + Self.apply_Limits; end Limits_are;