diff options
author | Jedidiah Barber <contact@jedbarber.id.au> | 2025-01-21 00:53:56 +1300 |
---|---|---|
committer | Jedidiah Barber <contact@jedbarber.id.au> | 2025-01-21 00:53:56 +1300 |
commit | f9e453e3d456514066e8ecbed9fbac93a588a0d0 (patch) | |
tree | 06587afde830fb324d5ab7372f0f1686c4fd993a /src/fltk-widgets-groups-spinners.ads | |
parent | 67a43ef89ba41ac32b86cda7396c16fffaf691b3 (diff) |
Using the type method is now more consistent
Diffstat (limited to 'src/fltk-widgets-groups-spinners.ads')
-rw-r--r-- | src/fltk-widgets-groups-spinners.ads | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/fltk-widgets-groups-spinners.ads b/src/fltk-widgets-groups-spinners.ads index 6030946..3124dc2 100644 --- a/src/fltk-widgets-groups-spinners.ads +++ b/src/fltk-widgets-groups-spinners.ads @@ -134,11 +134,11 @@ package FLTK.Widgets.Groups.Spinners is (This : in out Spinner; To : in String); - function Get_Type + function Get_Kind (This : in Spinner) return Spinner_Kind; - procedure Set_Type + procedure Set_Kind (This : in out Spinner; To : in Spinner_Kind); @@ -203,8 +203,8 @@ private pragma Inline (Get_Value); pragma Inline (Set_Value); - pragma Inline (Get_Type); - pragma Inline (Set_Type); + pragma Inline (Get_Kind); + pragma Inline (Set_Kind); pragma Inline (Resize); |