diff options
Diffstat (limited to 'src/fltk-menu_items.ads')
| -rw-r--r-- | src/fltk-menu_items.ads | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/src/fltk-menu_items.ads b/src/fltk-menu_items.ads index 9f02d27..5964a48 100644 --- a/src/fltk-menu_items.ads +++ b/src/fltk-menu_items.ads @@ -120,6 +120,14 @@ package FLTK.Menu_Items is (Item : in out Menu_Item; To : in Key_Combo); + function Get_Flags + (Item : in Menu_Item) + return Menu_Flag; + + procedure Set_Flags + (Item : in out Menu_Item; + To : in Menu_Flag); + @@ -185,6 +193,8 @@ private pragma Inline (Get_Shortcut); pragma Inline (Set_Shortcut); + pragma Inline (Get_Flags); + pragma Inline (Set_Flags); pragma Inline (Activate); |