summaryrefslogtreecommitdiff
path: root/src/fltk-widgets-menus.ads
diff options
context:
space:
mode:
authorJedidiah Barber <contact@jedbarber.id.au>2024-11-17 17:15:53 +1300
committerJedidiah Barber <contact@jedbarber.id.au>2024-11-17 17:15:53 +1300
commit619b3da9fbb37c57aedfc039cc813f6acf5569be (patch)
tree5577d1594900cd5e23afbc792d31ba9a40818d55 /src/fltk-widgets-menus.ads
parentf5f77c762534ed15adc557009d1a645e5fd998a5 (diff)
Refactored Finalize subprograms and made note of potential future Widget issues there in fltk.ads
Diffstat (limited to 'src/fltk-widgets-menus.ads')
-rw-r--r--src/fltk-widgets-menus.ads3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/fltk-widgets-menus.ads b/src/fltk-widgets-menus.ads
index bc72bef..c0e0ed4 100644
--- a/src/fltk-widgets-menus.ads
+++ b/src/fltk-widgets-menus.ads
@@ -262,6 +262,9 @@ private
Text : in String)
with Inline;
+ procedure Extra_Final
+ (This : in out Menu);
+
procedure Item_Hook (M, U : in Storage.Integer_Address);
pragma Convention (C, Item_Hook);