Slightly better / more consistent comments

1 files changed, 10 insertions, 0 deletions

diff --git a/spec/fltk-widgets-menus-menu_bars-systemwide.ads b/spec/fltk-widgets-menus-menu_bars-systemwide.ads
index 77dba9f..08f97d2 100644
--- a/spec/fltk-widgets-menus-menu_bars-systemwide.ads
+++ b/spec/fltk-widgets-menus-menu_bars-systemwide.ads
@@ -42,6 +42,8 @@ package FLTK.Widgets.Menus.Menu_Bars.Systemwide is
 
 
 
+    --  Menu Items  --
+
     procedure Add
            (This : in out System_Menu_Bar;
             Text : in     String);
@@ -133,6 +135,8 @@ package FLTK.Widgets.Menus.Menu_Bars.Systemwide is
 
 
 
+    --  Item Query  --
+
     function Item
            (This  : in System_Menu_Bar;
             Place : in Index)
@@ -141,6 +145,8 @@ package FLTK.Widgets.Menus.Menu_Bars.Systemwide is
 
 
 
+    --  Label, Shortcut, Flags  --
+
     procedure Set_Only
            (This : in out System_Menu_Bar;
             Item : in out FLTK.Menu_Items.Menu_Item);
@@ -168,6 +174,8 @@ package FLTK.Widgets.Menus.Menu_Bars.Systemwide is
 
 
 
+    --  Global  --
+
     procedure Make_Global
            (This : in out System_Menu_Bar);
 
@@ -177,6 +185,8 @@ package FLTK.Widgets.Menus.Menu_Bars.Systemwide is
 
 
 
+    --  Drawing  --
+
     procedure Draw
            (This : in out System_Menu_Bar);