summaryrefslogtreecommitdiff
path: root/src/fltk_binding/fltk-widget-group.ads
diff options
context:
space:
mode:
Diffstat (limited to 'src/fltk_binding/fltk-widget-group.ads')
-rw-r--r--src/fltk_binding/fltk-widget-group.ads57
1 files changed, 0 insertions, 57 deletions
diff --git a/src/fltk_binding/fltk-widget-group.ads b/src/fltk_binding/fltk-widget-group.ads
deleted file mode 100644
index d71f76c..0000000
--- a/src/fltk_binding/fltk-widget-group.ads
+++ /dev/null
@@ -1,57 +0,0 @@
-
-
-package FLTK.Widget.Group is
-
-
- type Group_Type is new Widget_Type with private;
- type Index is new Integer;
-
-
- function Create
- (X, Y, W, H : Integer;
- Label : String)
- return Group_Type;
-
-
- procedure Add
- (This : Group_Type'Class;
- Item : Widget_Type'Class);
-
-
- procedure Clear
- (This : Group_Type'Class);
-
-
- function Find
- (This : Group_Type'Class;
- Item : Widget_Type'Class)
- return Index;
-
-
- procedure Insert
- (This : Group_Type'Class;
- Item : Widget_Type'Class;
- Place : Index);
-
-
- procedure Remove
- (This : Group_Type'Class;
- Item : Widget_Type'Class);
-
-
- procedure Remove
- (This : Group_Type'Class;
- Place : Index);
-
-
-private
-
-
- type Group_Type is new Widget_Type with null record;
-
-
- overriding procedure Finalize (This : in out Group_Type);
-
-
-end FLTK.Widget.Group;
-