Tidy.

3-mid/physics/interface/source/private/box2d/box2d_physics-space.adb

@@ -15,6 +15,9 @@ with
 
      ada.unchecked_Conversion;
 
+with ada.Text_IO; use ada.Text_IO;
+
+
 package body box2d_Physics.Space
 is
    use box2d_c.Binding,
@@ -413,6 +416,7 @@ is
    end add;
 
 
+
    overriding
    procedure rid (Self : in out Item;   the_Object : in physics.Object.view)
    is
@@ -422,6 +426,7 @@ is
    end rid;
 
 
+
    overriding
    function cast_Ray (Self : access Item;    From, To : in Vector_3) return physics.Space.ray_Collision
    is
@@ -446,6 +451,7 @@ is
    end cast_Ray;
 
 
+
    overriding
    procedure evolve (Self : in out Item;   By : in Duration)
    is
@@ -470,6 +476,7 @@ is
    end evolve;
 
 
+
    overriding
    function Gravity (Self : in Item) return Vector_3
    is
@@ -479,6 +486,7 @@ is
    end Gravity;
 
 
+
    overriding
    procedure Gravity_is (Self : in out Item;   Now : in Vector_3)
    is