Slightly better / more consistent comments

1 files changed, 8 insertions, 0 deletions

diff --git a/spec/fltk-widgets-valuators-counters.ads b/spec/fltk-widgets-valuators-counters.ads
index fd3cea8..0bea0a6 100644
--- a/spec/fltk-widgets-valuators-counters.ads
+++ b/spec/fltk-widgets-valuators-counters.ads
@@ -40,6 +40,8 @@ package FLTK.Widgets.Valuators.Counters is
 
 
 
+    --  Button Steps  --
+
     function Get_Step
            (This : in Counter)
         return Long_Float;
@@ -63,6 +65,8 @@ package FLTK.Widgets.Valuators.Counters is
 
 
 
+    --  Text Settings  --
+
     function Get_Text_Color
            (This : in Counter)
         return Color;
@@ -90,6 +94,8 @@ package FLTK.Widgets.Valuators.Counters is
 
 
 
+    --  Drawing, Events  --
+
     procedure Draw
            (This : in out Counter);
 
@@ -101,6 +107,8 @@ package FLTK.Widgets.Valuators.Counters is
 
 
 
+    --  Counter Type  --
+
     function Get_Kind
            (This : in out Counter)
         return Counter_Kind;