diff options
Diffstat (limited to 'src/adapad.adb')
-rw-r--r-- | src/adapad.adb | 22 |
1 files changed, 15 insertions, 7 deletions
diff --git a/src/adapad.adb b/src/adapad.adb index 271b77d..63ad67f 100644 --- a/src/adapad.adb +++ b/src/adapad.adb @@ -1,19 +1,27 @@ -- with Editor; -with FLTK.Widget.Group.Window.Double; -with FLTK.Widget.Box; -with FLTK.Widget.Group.Text_Display; +with FLTK.Widgets.Groups.Windows.Double; +with FLTK.Widgets.Boxes; +with FLTK.Widgets.Buttons.Enter; +with FLTK.Widgets.Buttons.Light.Check; +with FLTK.Widgets.Buttons.Light.Radio; +with FLTK.Widgets.Buttons.Light.Round.Radio; +with FLTK.Widgets.Buttons.Radio; +with FLTK.Widgets.Buttons.Repeat; +with FLTK.Widgets.Buttons.Toggle; +with FLTK.Widgets.Inputs; +with FLTK.Widgets.Groups.Text_Displays; with FLTK.Enums; use FLTK.Enums; function AdaPad return Integer is - package Dbl renames FLTK.Widget.Group.Window.Double; - package Box renames FLTK.Widget.Box; + package Dbl renames FLTK.Widgets.Groups.Windows.Double; + package Bx renames FLTK.Widgets.Boxes; - W : Dbl.Double_Type := Dbl.Create (340, 180); - B : Box.Box_Type := Box.Create (20, 40, 300, 100, "Test"); + W : Dbl.Double_Window := Dbl.Create (340, 180); + B : Bx.Box := Bx.Create (20, 40, 300, 100, "Test"); begin |