Slightly better / more consistent comments

1 files changed, 8 insertions, 0 deletions

diff --git a/spec/fltk-widgets-positioners.ads b/spec/fltk-widgets-positioners.ads
index 0603239..4e06155 100644
--- a/spec/fltk-widgets-positioners.ads
+++ b/spec/fltk-widgets-positioners.ads
@@ -38,6 +38,8 @@ package FLTK.Widgets.Positioners is
 
 
 
+    --  Targeting  --
+
     procedure Get_Coords
            (This : in     Positioner;
             X, Y :    out Long_Float);
@@ -54,6 +56,8 @@ package FLTK.Widgets.Positioners is
 
 
 
+    --  X Axis  --
+
     procedure Set_Ecks_Bounds
            (This      : in out Positioner;
             Low, High : in     Long_Float);
@@ -94,6 +98,8 @@ package FLTK.Widgets.Positioners is
 
 
 
+    --  Y Axis  --
+
     procedure Set_Why_Bounds
            (This      : in out Positioner;
             Low, High : in     Long_Float);
@@ -134,6 +140,8 @@ package FLTK.Widgets.Positioners is
 
 
 
+    --  Drawing, Events  --
+
     procedure Draw
            (This : in out Positioner);