summaryrefslogtreecommitdiff
path: root/src/fltk-widgets-valuators-sliders-value-horizontal.ads
diff options
context:
space:
mode:
Diffstat (limited to 'src/fltk-widgets-valuators-sliders-value-horizontal.ads')
-rw-r--r--src/fltk-widgets-valuators-sliders-value-horizontal.ads6
1 files changed, 5 insertions, 1 deletions
diff --git a/src/fltk-widgets-valuators-sliders-value-horizontal.ads b/src/fltk-widgets-valuators-sliders-value-horizontal.ads
index bc0926c..fdea4b5 100644
--- a/src/fltk-widgets-valuators-sliders-value-horizontal.ads
+++ b/src/fltk-widgets-valuators-sliders-value-horizontal.ads
@@ -44,7 +44,11 @@ private
overriding procedure Finalize
(This : in out Hor_Value_Slider);
-
+ procedure Extra_Init
+ (This : in out Hor_Value_Slider;
+ X, Y, W, H : in Integer;
+ Text : in String)
+ with Inline;
pragma Inline (Draw);