diff options
author | Jed Barber <jjbarber@y7mail.com> | 2017-06-01 20:22:09 +1000 |
---|---|---|
committer | Jed Barber <jjbarber@y7mail.com> | 2017-06-01 20:22:09 +1000 |
commit | fbdf22f733d8fafd7193bee3080e2eaeab95b86f (patch) | |
tree | 88bc1a56542d181c9df5211b636f87b61562efbd /src/fltk-menu_items.ads | |
parent | b2aed4668c563b5649614938b22bf417b0b7f0bc (diff) |
Moved Menu_Item code to separate FLTK child package
Diffstat (limited to 'src/fltk-menu_items.ads')
-rw-r--r-- | src/fltk-menu_items.ads | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/src/fltk-menu_items.ads b/src/fltk-menu_items.ads new file mode 100644 index 0000000..98a9d9d --- /dev/null +++ b/src/fltk-menu_items.ads @@ -0,0 +1,29 @@ + + +package FLTK.Menu_Items is + + + type Menu_Item is new Wrapper with private; + + + function Value + (Item : in Menu_Item) + return Boolean; + + + procedure Activate + (Item : in Menu_Item); + + + procedure Deactivate + (Item : in Menu_Item); + + +private + + + type Menu_Item is new Wrapper with null record; + + +end FLTK.Menu_Items; + |