summaryrefslogtreecommitdiff
path: root/src/fltk-widgets-inputs-integer.ads
diff options
context:
space:
mode:
Diffstat (limited to 'src/fltk-widgets-inputs-integer.ads')
-rw-r--r--src/fltk-widgets-inputs-integer.ads7
1 files changed, 5 insertions, 2 deletions
diff --git a/src/fltk-widgets-inputs-integer.ads b/src/fltk-widgets-inputs-integer.ads
index b5d723e..57dec17 100644
--- a/src/fltk-widgets-inputs-integer.ads
+++ b/src/fltk-widgets-inputs-integer.ads
@@ -51,12 +51,15 @@ private
overriding procedure Finalize
(This : in out Integer_Input);
-
+ procedure Extra_Init
+ (This : in out Integer_Input;
+ X, Y, W, H : in Standard.Integer;
+ Text : in String)
+ with Inline;
pragma Inline (Get_Value);
-
pragma Inline (Draw);
pragma Inline (Handle);