From 547e538476a788dfeb5974f9b8ad29441d18980b Mon Sep 17 00:00:00 2001
From: Jedidiah Barber <contact@jedbarber.id.au>
Date: Thu, 6 Feb 2025 19:28:33 +1300
Subject: Slightly better / more consistent comments

---
 spec/fltk-widgets-groups-spinners.ads | 10 ++++++++++
 1 file changed, 10 insertions(+)

(limited to 'spec/fltk-widgets-groups-spinners.ads')

diff --git a/spec/fltk-widgets-groups-spinners.ads b/spec/fltk-widgets-groups-spinners.ads
index 3124dc2..681c4d7 100644
--- a/spec/fltk-widgets-groups-spinners.ads
+++ b/spec/fltk-widgets-groups-spinners.ads
@@ -40,6 +40,8 @@ package FLTK.Widgets.Groups.Spinners is
 
 
 
+    --  Settings  --
+
     function Get_Background_Color
            (This : in Spinner)
         return Color;
@@ -83,6 +85,8 @@ package FLTK.Widgets.Groups.Spinners is
 
 
 
+    --  Values  --
+
     function Get_Minimum
            (This : in Spinner)
         return Long_Float;
@@ -126,6 +130,8 @@ package FLTK.Widgets.Groups.Spinners is
 
 
 
+    --  Formatting  --
+
     function Get_Format
            (This : in Spinner)
         return String;
@@ -145,6 +151,8 @@ package FLTK.Widgets.Groups.Spinners is
 
 
 
+    --  Dimensions  --
+
     procedure Resize
            (This       : in out Spinner;
             X, Y, W, H : in     Integer);
@@ -152,6 +160,8 @@ package FLTK.Widgets.Groups.Spinners is
 
 
 
+    --  Events  --
+
     function Handle
            (This  : in out Spinner;
             Event : in     Event_Kind)
-- 
cgit